pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-01-13 10:22:04 +02:00
Code Issues Actions Releases Activity

Update to CEF 3.3202.1678.g28f27be

Browse Source
This commit is contained in:
Salvador Díaz Fau 2017-11-02 09:20:37 +01:00
parent 55cb5368ad
commit f5d1c6285a
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
source/uCEFApplication.pas
View File

@ -57,13 +57,13 @@ uses
const const
CEF_SUPPORTED_VERSION_MAJOR = 3; CEF_SUPPORTED_VERSION_MAJOR = 3;
CEF_SUPPORTED_VERSION_MINOR = 3202; CEF_SUPPORTED_VERSION_MINOR = 3202;
CEF_SUPPORTED_VERSION_RELEASE = 1677; CEF_SUPPORTED_VERSION_RELEASE = 1678;
CEF_SUPPORTED_VERSION_BUILD = 0; CEF_SUPPORTED_VERSION_BUILD = 0;
CEF_CHROMEELF_VERSION_MAJOR = 62; CEF_CHROMEELF_VERSION_MAJOR = 62;
CEF_CHROMEELF_VERSION_MINOR = 0; CEF_CHROMEELF_VERSION_MINOR = 0;
CEF_CHROMEELF_VERSION_RELEASE = 3202; CEF_CHROMEELF_VERSION_RELEASE = 3202;
CEF_CHROMEELF_VERSION_BUILD = 62; CEF_CHROMEELF_VERSION_BUILD = 75;
LIBCEF_DLL = 'libcef.dll'; LIBCEF_DLL = 'libcef.dll';
CHROMEELF_DLL = 'chrome_elf.dll'; CHROMEELF_DLL = 'chrome_elf.dll';
@ -454,7 +454,9 @@ begin
FCustomCommandLines := TStringList.Create; FCustomCommandLines := TStringList.Create;
FCustomCommandLineValues := TStringList.Create; FCustomCommandLineValues := TStringList.Create;
FBrowserProcessHandler := TCefCustomBrowserProcessHandler.Create(self);
if (FProcessType = ptBrowser) then
FBrowserProcessHandler := TCefCustomBrowserProcessHandler.Create(self);
end; end;
procedure TCefApplication.AddCustomCommandLine(const aCommandLine, aValue : string); procedure TCefApplication.AddCustomCommandLine(const aCommandLine, aValue : string);
@ -862,8 +864,6 @@ end;
function TCefApplication.ParseProcessType : TCefProcessType; function TCefApplication.ParseProcessType : TCefProcessType;
const const
TYPE_PARAMETER_NAME = '--type='; TYPE_PARAMETER_NAME = '--type=';
TYPE_RENDERER_VALUE = 'renderer';
TYPE_ZYGOTE_VALUE = 'zygote';
var var
i, TempLen : integer; i, TempLen : integer;
TempName, TempValue : string; TempName, TempValue : string;
@ -880,10 +880,10 @@ begin
begin begin
TempValue := copy(paramstr(i), succ(TempLen), length(paramstr(i))); TempValue := copy(paramstr(i), succ(TempLen), length(paramstr(i)));
if (CompareText(TempValue, TYPE_RENDERER_VALUE) = 0) then if (CompareText(TempValue, 'renderer') = 0) then
Result := ptRenderer Result := ptRenderer
else else
if (CompareText(TempValue, TYPE_ZYGOTE_VALUE) = 0) then if (CompareText(TempValue, 'zygote') = 0) then
Result := ptZygote Result := ptZygote
else else
Result := ptOther; Result := ptOther;