Update to CEF 128.4.8

demos/Lazarus_Windows/SubProcess/uSimpleBrowser.lfm

@@ -11,9 +11,9 @@ object Form1: TForm1
   Font.Height = -11
   Font.Name = 'Tahoma'
   OnCloseQuery = FormCloseQuery
+  OnCreate = FormCreate
   OnShow = FormShow
   Position = poScreenCenter
-  LCLVersion = '2.0.6.0'
   object ChromiumWindow1: TChromiumWindow
     Left = 0
     Height = 603
@@ -35,6 +35,7 @@ object Form1: TForm1
     ClientHeight = 21
     ClientWidth = 1038
     Enabled = False
+    ParentBackground = False
     TabOrder = 1
     object AddressEdt: TEdit
       Left = 0
@@ -52,15 +53,15 @@ object Form1: TForm1
       Width = 31
       Align = alRight
       Caption = 'Go'
-      OnClick = GoBtnClick
       TabOrder = 1
+      OnClick = GoBtnClick
     end
   end
   object Timer1: TTimer
     Enabled = False
     Interval = 300
     OnTimer = Timer1Timer
-    left = 80
-    top = 88
+    Left = 80
+    Top = 88
   end
 end

demos/Lazarus_Windows/SubProcess/uSimpleBrowser.pas

@@ -25,14 +25,18 @@ type
     AddressEdt: TEdit;
     GoBtn: TButton;
     Timer1: TTimer;
-    procedure CEFSentinel1Close(Sender: TObject);
+
+    procedure FormCreate(Sender: TObject);
     procedure GoBtnClick(Sender: TObject);
-    procedure FormShow(Sender: TObject);
-    procedure ChromiumWindow1AfterCreated(Sender: TObject);
     procedure Timer1Timer(Sender: TObject);
+
+    procedure FormShow(Sender: TObject);
     procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+
+    procedure ChromiumWindow1AfterCreated(Sender: TObject);
     procedure ChromiumWindow1Close(Sender: TObject);
     procedure ChromiumWindow1BeforeClose(Sender: TObject);
+
   private
     // You have to handle this two messages to call NotifyMoveOrResizeStarted or some page elements will be misaligned.
     procedure WMMove(var aMessage : TWMMove); message WM_MOVE;
@@ -155,9 +159,9 @@ begin
   ChromiumWindow1.LoadURL(AddressEdt.Text);
 end;
 
-procedure TForm1.CEFSentinel1Close(Sender: TObject);
+procedure TForm1.FormCreate(Sender: TObject);
 begin
-
+  ChromiumWindow1.ChromiumBrowser.RuntimeStyle := CEF_RUNTIME_STYLE_ALLOY;
 end;
 
 procedure TForm1.Timer1Timer(Sender: TObject);