Update to CEF 3.3029.1613.g22354a9

- Update to CEF 3.3029.1613.g22354a9 - Bug fix #28 - Added missing functions in uCEFMiscFunctions.pas - Fixed MDIBrowser app close issue. - Changed the CustomExceptionHandler to reraise exceptions with full trace.
2025-11-23 21:34:53 +02:00 · 2017-05-07 18:04:05 +02:00
parent 6b84d78cfe
commit 18a9de0a94
23 changed files with 1271 additions and 271 deletions
--- a/demos/SimpleBrowser/SimpleBrowser.dpr
+++ b/demos/SimpleBrowser/SimpleBrowser.dpr
@@ -46,6 +46,7 @@ uses
  Forms,
  {$ENDIF}
  uCEFApplication,
+  uCEFMiscFunctions,
  uSimpleBrowser in 'uSimpleBrowser.pas' {Form1};

 {$R *.res}
--- a/demos/SimpleBrowser/SimpleBrowser.dsk
+++ b/demos/SimpleBrowser/SimpleBrowser.dsk
@@ -1,27 +1,44 @@
 [Closed Files]
-File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas',0,1,72,1,85,0,0,,
-File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,2074,1,2095,0,0,,{1,859,20}{2,2096,10}
-File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFClient.pas',0,1,475,75,86,0,0,,
-File_3=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Controls.pas',0,1,10059,1,10081,0,0,,
-File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,29,24,60,0,0,,
-File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,188,40,238,0,0,,
+File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,180,12,209,0,0,,
+File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,36,25,69,0,0,,
+File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,2074,1,2095,0,0,,{1
+File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFClient.pas',0,1,475,75,86,0,0,,
+File_4=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Controls.pas',0,1,10059,1,10081,0,0,,
+File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,29,24,60,0,0,,
 File_6=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Forms.pas',0,1,4433,1,4455,0,0,{{1729,4}
 File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFLifeSpanHandler.pas',0,1,99,1,121,0,0,,
-File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBaseRefCounted.pas',0,1,65,1,87,0,0,,
-File_9=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\RTL\SYS\System.SysUtils.pas',0,1,21670,1,21692,0,0,,

 [Modules]
-Module0=default.htm
-Count=1
+Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dproj
+Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas
+Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas
+Module3=default.htm
+Count=4
 EditWindowCount=1

+[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dproj]
+ModuleType=TBaseProject
+
+[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas]
+ModuleType=TSourceModule
+FormState=1
+FormOnTop=1
+
+[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas]
+ModuleType=TSourceModule
+FormState=0
+FormOnTop=0
+
 [default.htm]
 ModuleType=TURLModule

 [EditWindow0]
-ViewCount=1
-CurrentView=0
+ViewCount=4
+CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr
 View0=0
+View1=1
+View2=2
+View3=3
 PercentageSizes=1
 Create=1
 Visible=1
@@ -55,6 +72,39 @@ BottomMiddelPanelData=0000080001020200000009000000446F636B5369746530100000004772
 CustomEditViewType=TWelcomePageView
 WelcomePageURL=bds:/default.htm

+[View1]
+CustomEditViewType=TEditView
+Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr
+CursorX=42
+CursorY=58
+TopLine=37
+LeftCol=1
+Elisions=
+Bookmarks=
+EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr
+
+[View2]
+CustomEditViewType=TEditView
+Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas
+CursorX=1
+CursorY=85
+TopLine=72
+LeftCol=1
+Elisions=
+Bookmarks=
+EditViewName=Borland.FormDesignerView
+
+[View3]
+CustomEditViewType=TEditView
+Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas
+CursorX=28
+CursorY=212
+TopLine=182
+LeftCol=1
+Elisions=
+Bookmarks=
+EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas
+
 [Watches]
 Count=0

@@ -209,8 +259,8 @@ Create=1
 Visible=0
 Docked=1
 State=0
-Left=-148
-Top=-137
+Left=-121
+Top=-74
 Width=1844
 Height=3139
 MaxLeft=-1
@@ -274,12 +324,17 @@ MaxLeft=-1
 MaxTop=-1
 ClientWidth=1898
 ClientHeight=5370
-TBDockHeight=7164
+TBDockHeight=7119
 LRDockWidth=1898
 Dockable=1
 StayOnTop=0
 SplitPos=111

+[PropInspDesignerSelection]
+ArrangeBy=Name
+SelectedItem=Action,
+ExpandedItems=Anchors=0,BorderIcons=0
+
 [frmDesignPreview]
 PercentageSizes=1
 Create=1
@@ -289,11 +344,11 @@ State=0
 Left=0
 Top=0
 Width=2000
-Height=6861
+Height=6816
 MaxLeft=-1
 MaxTop=-1
 ClientWidth=2000
-ClientHeight=6861
+ClientHeight=6816
 TBDockHeight=5964
 LRDockWidth=2508
 Dockable=1
@@ -305,8 +360,8 @@ Create=1
 Visible=0
 Docked=1
 State=0
-Left=-898
-Top=-137
+Left=-946
+Top=1
 Width=2844
 Height=6200
 MaxLeft=-1
@@ -324,8 +379,8 @@ Create=1
 Visible=0
 Docked=1
 State=0
-Left=-1026
-Top=-137
+Left=-1152
+Top=243
 Width=273
 Height=359
 MaxLeft=-1
@@ -429,11 +484,11 @@ State=0
 Left=0
 Top=0
 Width=2336
-Height=1177
+Height=942
 MaxLeft=-1
 MaxTop=-1
 ClientWidth=2336
-ClientHeight=1177
+ClientHeight=942
 TBDockHeight=2321
 LRDockWidth=2820
 Dockable=1
@@ -494,11 +549,11 @@ State=0
 Left=0
 Top=0
 Width=2000
-Height=6861
+Height=6816
 MaxLeft=-1
 MaxTop=-1
 ClientWidth=2000
-ClientHeight=6861
+ClientHeight=6816
 TBDockHeight=4888
 LRDockWidth=7148
 Dockable=1
@@ -510,8 +565,8 @@ Create=1
 Visible=0
 Docked=1
 State=0
-Left=0
-Top=0
+Left=249
+Top=709
 Width=2859
 Height=3206
 MaxLeft=-1
@@ -577,11 +632,11 @@ State=0
 Left=0
 Top=0
 Width=2000
-Height=6861
+Height=6816
 MaxLeft=-1
 MaxTop=-1
 ClientWidth=2000
-ClientHeight=6861
+ClientHeight=6816
 TBDockHeight=4888
 LRDockWidth=5305
 Dockable=1
@@ -642,7 +697,7 @@ Visible=0
 Docked=1
 State=0
 Left=0
-Top=0
+Top=23
 Width=3820
 Height=1424
 MaxLeft=-1
@@ -673,7 +728,7 @@ MaxLeft=-1
 MaxTop=-1
 ClientWidth=2000
 ClientHeight=4529
-TBDockHeight=7164
+TBDockHeight=7119
 LRDockWidth=2000
 Dockable=1
 StayOnTop=0
@@ -697,7 +752,7 @@ MaxLeft=-1
 MaxTop=-1
 ClientWidth=1898
 ClientHeight=3498
-TBDockHeight=7164
+TBDockHeight=7119
 LRDockWidth=1898
 Dockable=1
 StayOnTop=0
@@ -721,7 +776,7 @@ MaxLeft=-1
 MaxTop=-1
 ClientWidth=2000
 ClientHeight=4339
-TBDockHeight=7164
+TBDockHeight=7119
 LRDockWidth=2000
 Dockable=1
 StayOnTop=0
--- a/demos/SimpleBrowser/SimpleBrowser.identcache
+++ b/demos/SimpleBrowser/SimpleBrowser.identcache
--- a/demos/SimpleBrowser/SimpleBrowser.stat
+++ b/demos/SimpleBrowser/SimpleBrowser.stat
@@ -1,10 +1,10 @@
 [Stats]
-EditorSecs=3669
-DesignerSecs=276
+EditorSecs=3990
+DesignerSecs=294
 InspectorSecs=137
-CompileSecs=203202
-OtherSecs=772
+CompileSecs=228604
+OtherSecs=771
 StartTime=22/01/2017 14:51:01
 RealKeys=0
 EffectiveKeys=0
-DebugSecs=1405
+DebugSecs=1537
--- a/demos/SimpleBrowser/uSimpleBrowser.dfm
+++ b/demos/SimpleBrowser/uSimpleBrowser.dfm
@@ -2,8 +2,8 @@ object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Simple Browser'
-  ClientHeight = 562
-  ClientWidth = 684
+  ClientHeight = 624
+  ClientWidth = 1038
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
@@ -18,15 +18,17 @@ object Form1: TForm1
  object ChromiumWindow1: TChromiumWindow
    Left = 0
    Top = 30
-    Width = 684
-    Height = 532
+    Width = 1038
+    Height = 594
    Align = alClient
    TabOrder = 0
+    ExplicitWidth = 684
+    ExplicitHeight = 532
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
-    Width = 684
+    Width = 1038
    Height = 30
    Align = alTop
    BevelOuter = bvNone
@@ -36,19 +38,21 @@ object Form1: TForm1
    Padding.Bottom = 5
    ShowCaption = False
    TabOrder = 1
+    ExplicitWidth = 684
    object Edit1: TEdit
      Left = 5
      Top = 5
-      Width = 643
+      Width = 997
      Height = 20
      Margins.Right = 5
      Align = alClient
      TabOrder = 0
      Text = 'http://www.google.com'
+      ExplicitWidth = 643
      ExplicitHeight = 21
    end
    object Button1: TButton
-      Left = 648
+      Left = 1002
      Top = 5
      Width = 31
      Height = 20
@@ -57,6 +61,7 @@ object Form1: TForm1
      Caption = 'Go'
      TabOrder = 1
      OnClick = Button1Click
+      ExplicitLeft = 648
    end
  end
 end