Update to CEF 78.2.14

README.md

@@ -3,13 +3,13 @@ CEF4Delphi is an open source project created by Salvador D
 
 CEF4Delphi is based on DCEF3, made by Henri Gourvest. The original license of DCEF3 still applies to CEF4Delphi. Read the license terms in the first lines of any *.pas file.
 
-CEF4Delphi uses CEF 78.2.10 which includes Chromium 78.0.3904.70. 
+CEF4Delphi uses CEF 78.2.14 which includes Chromium 78.0.3904.87. 
 The CEF binaries used by CEF4Delphi are available for download at spotify :
-* [32 bits](http://opensource.spotify.com/cefbuilds/cef_binary_78.2.10%2Bg942899d%2Bchromium-78.0.3904.70_windows32.tar.bz2)
-* [64 bits](http://opensource.spotify.com/cefbuilds/cef_binary_78.2.10%2Bg942899d%2Bchromium-78.0.3904.70_windows64.tar.bz2)
+* [32 bits](http://opensource.spotify.com/cefbuilds/cef_binary_78.2.14%2Bg9633d3e%2Bchromium-78.0.3904.87_windows32.tar.bz2)
+* [64 bits](http://opensource.spotify.com/cefbuilds/cef_binary_78.2.14%2Bg9633d3e%2Bchromium-78.0.3904.87_windows64.tar.bz2)
 
 
-CEF4Delphi was developed and tested on Delphi 10.3 Rio and it has been tested in Delphi 7, Delphi XE, Delphi 10, Delphi 10.2 and Lazarus 2.0.4/FPC 3.0.4. CEF4Delphi includes VCL, FireMonkey (FMX) and Lazarus components.
+CEF4Delphi was developed and tested on Delphi 10.3 Rio and it has been tested in Delphi 7, Delphi XE, Delphi 10, Delphi 10.2 and Lazarus 2.0.6/FPC 3.0.4. CEF4Delphi includes VCL, FireMonkey (FMX) and Lazarus components.
 
 ## Links
 * [Installation instructions and more information about CEF4Delphi](https://www.briskbard.com/index.php?lang=en&pageid=cef)
@@ -17,7 +17,7 @@ CEF4Delphi was developed and tested on Delphi 10.3 Rio and it has been tested in
 * These components need Windows 7, 8, 8.1, 10 or newer to run. If you need Windows XP and Vista support use [OldCEF4Delphi](https://github.com/salvadordf/OldCEF4Delphi)
 
 ## Stable releases 
-This is the development branch and it may have issues. Use the [latest release](https://github.com/salvadordf/CEF4Delphi/releases) if you need a stable component.
+This is the development branch and it may have issues. Use the [latest release](https://github.com/salvadordf/CEF4Delphi/releases/latest) if you need a stable component.
 
 ## Suppport
 If you find this project useful, please consider making a donation.

demos/Lazarus/MiniBrowser/MiniBrowser.lps

@@ -4,7 +4,7 @@
     <PathDelim Value="\"/>
     <Version Value="11"/>
     <BuildModes Active="Default"/>
-    <Units Count="7">
+    <Units Count="8">
       <Unit0>
         <Filename Value="MiniBrowser.lpr"/>
         <IsPartOfProject Value="True"/>
@@ -20,7 +20,6 @@
         <ComponentName Value="MiniBrowserFrm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <IsVisibleTab Value="True"/>
         <EditorIndex Value="1"/>
         <TopLine Value="1009"/>
         <CursorPos X="74" Y="1029"/>
@@ -40,6 +39,7 @@
         <ComponentName Value="PreferencesFrm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
+        <IsVisibleTab Value="True"/>
         <EditorIndex Value="2"/>
         <TopLine Value="69"/>
         <CursorPos X="17" Y="92"/>
@@ -80,6 +80,12 @@
         <CursorPos X="41" Y="979"/>
         <UsageCount Value="10"/>
       </Unit6>
+      <Unit7>
+        <Filename Value="..\..\..\source\uCEFApplication.pas"/>
+        <EditorIndex Value="-1"/>
+        <TopLine Value="43"/>
+        <UsageCount Value="10"/>
+      </Unit7>
     </Units>
     <JumpHistory Count="30" HistoryIndex="29">
       <Position1>

demos/Lazarus/PopupBrowser2/PopupBrowser2.lps

@@ -37,7 +37,8 @@
         <ComponentName Value="ChildForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <EditorIndex Value="3"/>
+        <IsVisibleTab Value="True"/>
+        <EditorIndex Value="2"/>
         <TopLine Value="52"/>
         <CursorPos X="54" Y="97"/>
         <UsageCount Value="23"/>
@@ -54,12 +55,10 @@
       </Unit3>
       <Unit4>
         <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <IsVisibleTab Value="True"/>
-        <EditorIndex Value="2"/>
+        <EditorIndex Value="-1"/>
         <TopLine Value="2395"/>
         <CursorPos X="3" Y="2406"/>
         <UsageCount Value="10"/>
-        <Loaded Value="True"/>
       </Unit4>
       <Unit5>
         <Filename Value="..\..\..\source\uCEFMiscFunctions.pas"/>
@@ -84,7 +83,7 @@
         <UsageCount Value="10"/>
       </Unit7>
     </Units>
-    <JumpHistory Count="30" HistoryIndex="29">
+    <JumpHistory Count="20" HistoryIndex="19">
       <Position1>
         <Filename Value="uMainForm.pas"/>
         <Caret Line="346" Column="58" TopLine="320"/>
@@ -165,46 +164,6 @@
         <Filename Value="uMainForm.pas"/>
         <Caret Line="152" Column="58" TopLine="128"/>
       </Position20>
-      <Position21>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="507" Column="42" TopLine="495"/>
-      </Position21>
-      <Position22>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="582" Column="55" TopLine="568"/>
-      </Position22>
-      <Position23>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="507" Column="44" TopLine="495"/>
-      </Position23>
-      <Position24>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="582" Column="29" TopLine="568"/>
-      </Position24>
-      <Position25>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="2406" Column="3" TopLine="2395"/>
-      </Position25>
-      <Position26>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="582" Column="45" TopLine="569"/>
-      </Position26>
-      <Position27>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="2415" Column="68" TopLine="2395"/>
-      </Position27>
-      <Position28>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="507" Column="19" TopLine="497"/>
-      </Position28>
-      <Position29>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="3423" Column="60" TopLine="3410"/>
-      </Position29>
-      <Position30>
-        <Filename Value="..\..\..\source\uCEFChromium.pas"/>
-        <Caret Line="582" Column="19" TopLine="564"/>
-      </Position30>
     </JumpHistory>
     <RunParams>
       <FormatVersion Value="2"/>

packages/cef4delphi_lazarus.lpk

@@ -21,7 +21,7 @@
     </CompilerOptions>
     <Description Value="CEF4Delphi is an open source project created by Salvador Díaz Fau to embed Chromium-based browsers in applications made with Delphi or Lazarus/FPC."/>
     <License Value="MPL 1.1"/>
-    <Version Major="78" Minor="2" Release="10"/>
+    <Version Major="78" Minor="2" Release="14"/>
     <Files Count="144">
       <Item1>
         <Filename Value="..\source\uCEFAccessibilityHandler.pas"/>

source/uCEFApplication.pas

@@ -62,13 +62,13 @@ uses
 const
   CEF_SUPPORTED_VERSION_MAJOR   = 78;
   CEF_SUPPORTED_VERSION_MINOR   = 2;
-  CEF_SUPPORTED_VERSION_RELEASE = 10;
+  CEF_SUPPORTED_VERSION_RELEASE = 14;
   CEF_SUPPORTED_VERSION_BUILD   = 0;
 
   CEF_CHROMEELF_VERSION_MAJOR   = 78;
   CEF_CHROMEELF_VERSION_MINOR   = 0;
   CEF_CHROMEELF_VERSION_RELEASE = 3904;
-  CEF_CHROMEELF_VERSION_BUILD   = 70;
+  CEF_CHROMEELF_VERSION_BUILD   = 87;
 
   {$IFDEF MSWINDOWS}
   LIBCEF_DLL                    = 'libcef.dll';

source/uCEFChromium.pas

@@ -575,7 +575,7 @@ type
       function    IsSameBrowser(const aBrowser : ICefBrowser) : boolean;
       function    ExecuteTaskOnCefThread(aCefThreadId : TCefThreadId; aTaskID : cardinal; aDelayMs : Int64 = 0) : boolean;
 
-      function    DeleteCookies(const url : ustring = ''; const cookieName : ustring = '') : boolean;
+      function    DeleteCookies(const url : ustring = ''; const cookieName : ustring = ''; aDeleteImmediately : boolean = False) : boolean;
       function    VisitAllCookies(aID : integer = 0) : boolean;
       function    VisitURLCookies(const url : ustring; includeHttpOnly : boolean = False; aID : integer = 0) : boolean;
       function    SetCookie(const url, name_, value, domain, path: ustring; secure, httponly, hasExpires: Boolean; const creation, lastAccess, expires: TDateTime; aSetImmediately : boolean = True; aID : integer = 0): Boolean;
@@ -2322,7 +2322,9 @@ begin
     end;
 end;
 
-function TChromium.DeleteCookies(const url, cookieName: ustring) : boolean;
+// If aDeleteImmediately is false TChromium.DeleteCookies triggers the TChromium.OnCookiesDeleted
+// event when the cookies are deleted.
+function TChromium.DeleteCookies(const url, cookieName: ustring; aDeleteImmediately : boolean) : boolean;
 var
   TempManager  : ICefCookieManager;
   TempCallback : ICefDeleteCookiesCallback;
@@ -2335,8 +2337,12 @@ begin
 
       if (TempManager <> nil) then
         try
-          TempCallback := TCefCustomDeleteCookiesCallback.Create(self);
-          Result       := TempManager.DeleteCookies(url, cookieName, TempCallback);
+          if aDeleteImmediately then
+            TempCallBack := nil
+           else
+            TempCallback := TCefCustomDeleteCookiesCallback.Create(self);
+
+          Result := TempManager.DeleteCookies(url, cookieName, TempCallback);
         finally
           TempCallback := nil;
         end;

source/uCEFFMXChromium.pas

@@ -540,7 +540,7 @@ type
       function    IsSameBrowser(const aBrowser : ICefBrowser) : boolean;
       function    ExecuteTaskOnCefThread(aCefThreadId : TCefThreadId; aTaskID : cardinal; aDelayMs : Int64 = 0) : boolean;
 
-      function    DeleteCookies(const url : ustring = ''; const cookieName : ustring = '') : boolean;
+      function    DeleteCookies(const url : ustring = ''; const cookieName : ustring = ''; aDeleteImmediately : boolean = False) : boolean;
       function    VisitAllCookies(aID : integer = 0) : boolean;
       function    VisitURLCookies(const url : ustring; includeHttpOnly : boolean = False; aID : integer = 0) : boolean;
       function    SetCookie(const url: ustring; const name, value, domain, path: ustring; secure, httponly, hasExpires: Boolean; const creation, lastAccess, expires: TDateTime; aSetImmediately : boolean = True; aID : integer = 0): Boolean;
@@ -2121,7 +2121,9 @@ begin
     end;
 end;
 
-function TFMXChromium.DeleteCookies(const url, cookieName: ustring) : boolean;
+// If aDeleteImmediately is false TChromium.DeleteCookies triggers the TChromium.OnCookiesDeleted
+// event when the cookies are deleted.
+function TFMXChromium.DeleteCookies(const url, cookieName: ustring; aDeleteImmediately : boolean) : boolean;
 var
   TempManager  : ICefCookieManager;
   TempCallback : ICefDeleteCookiesCallback;
@@ -2134,8 +2136,12 @@ begin
 
       if (TempManager <> nil) then
         try
-          TempCallback := TCefCustomDeleteCookiesCallback.Create(self);
-          Result       := TempManager.DeleteCookies(url, cookieName, TempCallback);
+          if aDeleteImmediately then
+            TempCallBack := nil
+           else
+            TempCallback := TCefCustomDeleteCookiesCallback.Create(self);
+
+          Result := TempManager.DeleteCookies(url, cookieName, TempCallback);
         finally
           TempCallback := nil;
         end;

update_CEF4Delphi.json

@@ -2,9 +2,9 @@
   "UpdateLazPackages" : [
     {
       "ForceNotify" : true,
-      "InternalVersion" : 53,
+      "InternalVersion" : 54,
       "Name" : "cef4delphi_lazarus.lpk",
-      "Version" : "78.2.10.0"
+      "Version" : "78.2.14.0"
     }
   ],
   "UpdatePackageData" : {