1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00

Update to CEF 88.2.1

- Added  xlib error handlers to the "interface" unit in the Lazarus demos for Linux.
- Added the "broker" CEF process type.
- Add the Zygote process to all the MustCreate* functions in TCefApplicationCore
This commit is contained in:
Salvador Diaz Fau
2021-02-04 16:59:08 +01:00
parent 12cce1cbba
commit 5c93e5c49a
16 changed files with 189 additions and 27 deletions

View File

@@ -65,14 +65,14 @@ uses
const
CEF_SUPPORTED_VERSION_MAJOR = 88;
CEF_SUPPORTED_VERSION_MINOR = 1;
CEF_SUPPORTED_VERSION_RELEASE = 6;
CEF_SUPPORTED_VERSION_MINOR = 2;
CEF_SUPPORTED_VERSION_RELEASE = 1;
CEF_SUPPORTED_VERSION_BUILD = 0;
CEF_CHROMEELF_VERSION_MAJOR = 88;
CEF_CHROMEELF_VERSION_MINOR = 0;
CEF_CHROMEELF_VERSION_RELEASE = 4324;
CEF_CHROMEELF_VERSION_BUILD = 96;
CEF_CHROMEELF_VERSION_BUILD = 146;
{$IFDEF MSWINDOWS}
LIBCEF_DLL = 'libcef.dll';
@@ -1552,7 +1552,10 @@ begin
if (CompareText(TempValue, 'utility') = 0) then
Result := ptUtility
else
Result := ptOther;
if (CompareText(TempValue, 'broker') = 0) then
Result := ptBroker
else
Result := ptOther;
end;
dec(i);
@@ -2159,7 +2162,7 @@ end;
function TCefApplicationCore.GetMustCreateResourceBundleHandler : boolean;
begin
Result := ((FSingleProcess or (FProcessType in [ptBrowser, ptRenderer])) and
Result := ((FSingleProcess or (FProcessType in [ptBrowser, ptRenderer, ptZygote])) and
(FMustCreateResourceBundleHandler or
assigned(FOnGetLocalizedString) or
assigned(FOnGetDataResource) or
@@ -2180,7 +2183,7 @@ end;
function TCefApplicationCore.GetMustCreateRenderProcessHandler : boolean;
begin
Result := ((FSingleProcess or (FProcessType = ptRenderer)) and
Result := ((FSingleProcess or (FProcessType in [ptRenderer, ptZygote])) and
(FMustCreateRenderProcessHandler or
MustCreateLoadHandler or
assigned(FOnWebKitInitialized) or
@@ -2195,7 +2198,7 @@ end;
function TCefApplicationCore.GetMustCreateLoadHandler : boolean;
begin
Result := ((FSingleProcess or (FProcessType = ptRenderer)) and
Result := ((FSingleProcess or (FProcessType in [ptRenderer, ptZygote])) and
(FMustCreateLoadHandler or
assigned(FOnLoadingStateChange) or
assigned(FOnLoadStart) or

View File

@@ -915,7 +915,7 @@ begin
begin
TempMonitor := TempForm.Monitor;
if (TempMonitor <> nil) then
if (TempMonitor <> nil) and (TempMonitor.PixelsPerInch > 0) then
begin
aResultScale := TempMonitor.PixelsPerInch / USER_DEFAULT_SCREEN_DPI;
Result := True;

View File

@@ -444,7 +444,7 @@ type
// in the main thread before closing the browser.
TCefCloseBrowserAction = (cbaClose, cbaDelay, cbaCancel);
TCefProcessType = (ptBrowser, ptRenderer, ptZygote, ptGPU, ptUtility, ptOther);
TCefProcessType = (ptBrowser, ptRenderer, ptZygote, ptGPU, ptUtility, ptBroker, ptOther);
// Used in TChromium preferences to allow or block cookies.
TCefCookiePref = (cpDefault, cpAllow, cpBlock);