diff --git a/demos/CookieVisitor/CookieVisitor.dproj.local b/demos/CookieVisitor/CookieVisitor.dproj.local index f3b25529..a18d69ad 100644 --- a/demos/CookieVisitor/CookieVisitor.dproj.local +++ b/demos/CookieVisitor/CookieVisitor.dproj.local @@ -2,13 +2,13 @@ 2017/08/19 10:36:06.000.317,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/19 10:36:56.000.222,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm - 2017/08/19 10:36:56.000.222,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/19 10:37:04.000.708,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj - 2017/08/19 10:37:17.000.131,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.dfm - 2017/08/19 10:37:17.000.131,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.pas - 2017/08/19 10:37:20.000.965,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dfm - 2017/08/19 10:37:20.000.965,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.pas + 2017/08/19 10:36:56.000.222,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.pas + 2017/08/19 10:36:56.000.222,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.dfm + 2017/08/19 10:37:04.000.708,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dproj + 2017/08/19 10:37:17.000.131,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dfm + 2017/08/19 10:37:17.000.131,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\UCookieVisitor.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.pas + 2017/08/19 10:37:20.000.965,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.dfm + 2017/08/19 10:37:20.000.965,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas 2017/08/19 10:51:46.000.224,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uSimpleTextViewer.pas diff --git a/demos/CookieVisitor/CookieVisitor.dsk b/demos/CookieVisitor/CookieVisitor.dsk index 905a4ef0..c6280f85 100644 --- a/demos/CookieVisitor/CookieVisitor.dsk +++ b/demos/CookieVisitor/CookieVisitor.dsk @@ -10,22 +10,27 @@ File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,124,60,40,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas -Module1=default.htm -Count=2 +Module0=default.htm +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dproj +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas +Count=3 EditWindowCount=1 -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas] -ModuleType=TSourceModule - [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dproj] +ModuleType=TBaseProject + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas] +ModuleType=TSourceModule + [EditWindow0] -ViewCount=2 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas +ViewCount=3 +CurrentView=0 View0=0 View1=1 +View2=2 PercentageSizes=1 Create=1 Visible=1 @@ -44,8 +49,8 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF @@ -53,6 +58,7 @@ BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -61,14 +67,25 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas -CursorX=31 -CursorY=156 -TopLine=73 +CursorX=62 +CursorY=64 +TopLine=34 LeftCol=1 Elisions= Bookmarks= EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\uCookieVisitor.pas +[View2] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dpr +CursorX=96 +CursorY=44 +TopLine=37 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CookieVisitor\CookieVisitor.dpr + [UndockedDesigner] Count=0 @@ -134,11 +151,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -226,8 +243,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=-30 +Left=-148 +Top=-132 Width=1844 Height=3139 MaxLeft=-1 @@ -283,25 +300,20 @@ Create=1 Visible=0 Docked=1 State=0 -Left=78 -Top=386 +Left=0 +Top=357 Width=1898 -Height=7220 +Height=5415 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=7220 +ClientHeight=5415 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 SplitPos=111 -[PropInspDesignerSelection] -ArrangeBy=Name -SelectedItem=Action, -ExpandedItems= - [frmDesignPreview] PercentageSizes=1 Create=1 @@ -311,11 +323,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=6883 +Height=6939 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=6883 +ClientHeight=6939 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -327,8 +339,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-946 -Top=5 +Left=-898 +Top=-132 Width=2844 Height=6200 MaxLeft=-1 @@ -346,8 +358,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-1026 +Top=-132 Width=273 Height=359 MaxLeft=-1 @@ -470,11 +482,11 @@ State=0 Left=0 Top=0 Width=2336 -Height=964 +Height=1200 MaxLeft=-1 MaxTop=-1 ClientWidth=2336 -ClientHeight=964 +ClientHeight=1200 TBDockHeight=2321 LRDockWidth=2820 Dockable=1 @@ -535,11 +547,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=6883 +Height=6939 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=6883 +ClientHeight=6939 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -551,8 +563,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=249 -Top=709 +Left=0 +Top=0 Width=2859 Height=3206 MaxLeft=-1 @@ -598,12 +610,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6794 +Width=1898 +Height=9215 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9215 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -618,11 +630,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=6883 +Height=6939 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=6883 +ClientHeight=6939 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -683,7 +695,7 @@ Visible=0 Docked=1 State=0 Left=0 -Top=18 +Top=0 Width=3820 Height=1424 MaxLeft=-1 @@ -709,12 +721,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -731,13 +743,13 @@ Visible=0 Docked=1 State=0 Left=0 -Top=0 +Top=18 Width=1898 -Height=7220 +Height=9215 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9215 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -747,11 +759,11 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 @@ -762,7 +774,7 @@ MaxLeft=-1 MaxTop=-1 ClientWidth=2000 ClientHeight=4383 -TBDockHeight=7164 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/CookieVisitor/CookieVisitor.stat b/demos/CookieVisitor/CookieVisitor.stat index 224f1ad8..02499d33 100644 --- a/demos/CookieVisitor/CookieVisitor.stat +++ b/demos/CookieVisitor/CookieVisitor.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=3342 +EditorSecs=3401 DesignerSecs=50 InspectorSecs=52 CompileSecs=50004 -OtherSecs=106 +OtherSecs=110 StartTime=19/08/2017 10:48:56 RealKeys=0 EffectiveKeys=0 diff --git a/demos/CookieVisitor/uCookieVisitor.pas b/demos/CookieVisitor/uCookieVisitor.pas index 878e83da..c49b5a29 100644 --- a/demos/CookieVisitor/uCookieVisitor.pas +++ b/demos/CookieVisitor/uCookieVisitor.pas @@ -53,7 +53,6 @@ uses uCEFCookieManager, uCEFCookieVisitor; const - MINIBROWSER_CREATED = WM_APP + $100; MINIBROWSER_SHOWCOOKIES = WM_APP + $101; MINIBROWSER_CONTEXTMENU_DELETECOOKIES = MENU_ID_USER_FIRST + 1; @@ -84,7 +83,7 @@ type private procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure ShowCookiesMsg(var aMessage : TMessage); message MINIBROWSER_SHOWCOOKIES; protected @@ -171,7 +170,7 @@ end; procedure TCookieVisitorFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TCookieVisitorFrm.Chromium1BeforeContextMenu(Sender: TObject; diff --git a/demos/CustomResourceBrowser/CRBrowser.dproj.local b/demos/CustomResourceBrowser/CRBrowser.dproj.local index 4b5e7f47..af187ba0 100644 --- a/demos/CustomResourceBrowser/CRBrowser.dproj.local +++ b/demos/CustomResourceBrowser/CRBrowser.dproj.local @@ -2,9 +2,9 @@ 2017/07/01 10:31:40.000.157,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/07/01 10:33:03.000.262,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/07/01 10:33:03.000.262,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm - 2017/07/01 10:33:13.000.749,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/07/01 10:33:03.000.262,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas + 2017/07/01 10:33:03.000.262,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.dfm + 2017/07/01 10:33:13.000.749,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dproj 2017/07/01 10:54:08.000.543,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uCustomResourceHandler.pas diff --git a/demos/CustomResourceBrowser/CRBrowser.dsk b/demos/CustomResourceBrowser/CRBrowser.dsk index da83c5f2..187f4a80 100644 --- a/demos/CustomResourceBrowser/CRBrowser.dsk +++ b/demos/CustomResourceBrowser/CRBrowser.dsk @@ -9,28 +9,28 @@ File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas',0,1,67,21,84,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uCustomResourceHandler.pas -Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dproj -Module3=default.htm +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dproj +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas +Module2=default.htm +Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uCustomResourceHandler.pas Count=4 EditWindowCount=1 -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas] -ModuleType=TSourceModule - -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uCustomResourceHandler.pas] -ModuleType=TSourceModule - [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dproj] ModuleType=TBaseProject +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas] +ModuleType=TSourceModule + [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uCustomResourceHandler.pas] +ModuleType=TSourceModule + [EditWindow0] ViewCount=4 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dpr View0=0 View1=1 View2=2 @@ -53,8 +53,8 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF @@ -62,6 +62,7 @@ BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -70,7 +71,7 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\CRBrowser.dpr -CursorX=40 +CursorX=2 CursorY=68 TopLine=31 LeftCol=1 @@ -92,9 +93,9 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View3] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\CustomResourceBrowser\uMainForm.pas -CursorX=17 -CursorY=133 -TopLine=116 +CursorX=1 +CursorY=67 +TopLine=53 LeftCol=1 Elisions= Bookmarks= @@ -165,11 +166,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -202,12 +203,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=4383 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -372,8 +373,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -735,12 +736,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -773,22 +774,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=4383 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/CustomResourceBrowser/CRBrowser.stat b/demos/CustomResourceBrowser/CRBrowser.stat index 18900dc7..bbbd4e11 100644 --- a/demos/CustomResourceBrowser/CRBrowser.stat +++ b/demos/CustomResourceBrowser/CRBrowser.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=601 +EditorSecs=688 DesignerSecs=11 InspectorSecs=14 -CompileSecs=57962 -OtherSecs=91 +CompileSecs=66938 +OtherSecs=105 StartTime=01/07/2017 11:24:39 RealKeys=0 EffectiveKeys=0 -DebugSecs=96 +DebugSecs=114 diff --git a/demos/CustomResourceBrowser/uMainForm.pas b/demos/CustomResourceBrowser/uMainForm.pas index 22f763bd..5f00f522 100644 --- a/demos/CustomResourceBrowser/uMainForm.pas +++ b/demos/CustomResourceBrowser/uMainForm.pas @@ -49,10 +49,7 @@ uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, {$ENDIF} - uCEFChromium, uCEFWindowParent, uCEFChromiumWindow, uCEFInterfaces, uCustomResourceHandler; - -const - MINIBROWSER_CREATED = WM_APP + $100; + uCEFChromium, uCEFWindowParent, uCEFChromiumWindow, uCEFInterfaces, uCustomResourceHandler, uCEFConstants; type TMainForm = class(TForm) @@ -67,10 +64,9 @@ type private procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; protected - procedure Chromium_OnAfterCreated(Sender: TObject; const browser: ICefBrowser); + procedure Chromium_OnAfterCreated(Sender: TObject); procedure Chromium_OnGetResourceHandler(Sender: TObject; const browser: ICefBrowser; const frame: ICefFrame; const request: ICefRequest; out Result: ICefResourceHandler); public @@ -94,14 +90,15 @@ end; procedure TMainForm.FormShow(Sender: TObject); begin - ChromiumWindow1.ChromiumBrowser.OnAfterCreated := Chromium_OnAfterCreated; + ChromiumWindow1.OnAfterCreated := Chromium_OnAfterCreated; ChromiumWindow1.ChromiumBrowser.OnGetResourceHandler := Chromium_OnGetResourceHandler; ChromiumWindow1.CreateBrowser; end; -procedure TMainForm.Chromium_OnAfterCreated(Sender: TObject; const browser: ICefBrowser); +procedure TMainForm.Chromium_OnAfterCreated(Sender: TObject); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + ChromiumWindow1.UpdateSize; + AddressBarPnl.Enabled := True; end; procedure TMainForm.Chromium_OnGetResourceHandler(Sender : TObject; @@ -128,12 +125,6 @@ begin end; end; -procedure TMainForm.BrowserCreatedMsg(var aMessage : TMessage); -begin - ChromiumWindow1.UpdateSize; - AddressBarPnl.Enabled := True; -end; - procedure TMainForm.WMMove(var aMessage : TWMMove); begin inherited; diff --git a/demos/DOMVisitor/DOMVisitor.dproj.local b/demos/DOMVisitor/DOMVisitor.dproj.local index c739ec21..fa70fe1d 100644 --- a/demos/DOMVisitor/DOMVisitor.dproj.local +++ b/demos/DOMVisitor/DOMVisitor.dproj.local @@ -2,8 +2,8 @@ 2017/08/12 12:09:33.000.056,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/12 12:12:06.000.226,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitorBrowser\uDOMVisitor.pas - 2017/08/12 12:12:06.000.226,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitorBrowser\uDOMVisitor.dfm - 2017/08/12 12:12:14.000.517,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitorBrowser\DOMVisitor.dproj + 2017/08/12 12:12:06.000.226,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitorBrowser\uDOMVisitor.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas + 2017/08/12 12:12:06.000.226,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitorBrowser\uDOMVisitor.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm + 2017/08/12 12:12:14.000.517,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitorBrowser\DOMVisitor.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj diff --git a/demos/DOMVisitor/DOMVisitor.dsk b/demos/DOMVisitor/DOMVisitor.dsk index f2d16a5a..06fa2c8a 100644 --- a/demos/DOMVisitor/DOMVisitor.dsk +++ b/demos/DOMVisitor/DOMVisitor.dsk @@ -11,27 +11,32 @@ File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uHelloScheme.pas',0,1,116,20,133,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\DOMVisitor.dproj -Module1=default.htm -Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas -Count=3 +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\DOMVisitor.dproj +Module3=default.htm +Count=4 EditWindowCount=1 +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas] +ModuleType=TSourceModule + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas] +ModuleType=TSourceModule + [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\DOMVisitor.dproj] ModuleType=TBaseProject [default.htm] ModuleType=TURLModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas] -ModuleType=TSourceModule - [EditWindow0] -ViewCount=3 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\DOMVisitor.dpr +ViewCount=4 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas View0=0 View1=1 View2=2 +View3=3 PercentageSizes=1 Create=1 Visible=1 @@ -49,15 +54,17 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 -RightPanelSize=0 +RightPanelSize=2000 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D3B3600000000000002E40500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0,DockSite2=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -77,14 +84,25 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas -CursorX=55 -CursorY=165 -TopLine=161 +CursorX=61 +CursorY=66 +TopLine=59 LeftCol=1 Elisions= Bookmarks= EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\DOMVisitor\uDOMVisitor.pas +[View3] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas +CursorX=48 +CursorY=362 +TopLine=327 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas + [UndockedDesigner] Count=0 @@ -102,11 +120,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -150,11 +168,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8857 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8857 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -167,14 +185,14 @@ Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1357 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1357 -TBDockHeight=1357 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -188,11 +206,11 @@ State=0 Left=0 Top=0 Width=1875 -Height=6738 +Height=6794 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -302,12 +320,12 @@ State=0 Left=78 Top=386 Width=1898 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=7164 -TBDockHeight=7164 +ClientHeight=7220 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -321,12 +339,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -338,8 +356,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1210 -Top=-7 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -382,11 +400,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -401,11 +419,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -424,11 +442,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -443,11 +461,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -545,12 +563,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -584,11 +602,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -609,12 +627,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6738 +Width=1898 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -628,12 +646,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -696,12 +714,12 @@ State=0 Left=0 Top=18 Width=3820 -Height=1357 +Height=1424 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -710,22 +728,22 @@ ActiveTabID=DebugLogView TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=4 -Top=24 +Left=0 +Top=18 Width=2000 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9137 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -741,15 +759,15 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=1 +Top=24 Width=1898 -Height=7164 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 -TBDockHeight=7164 +ClientWidth=1898 +ClientHeight=9137 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -768,12 +786,12 @@ State=0 Left=0 Top=0 Width=2000 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 -TBDockHeight=7164 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/DOMVisitor/DOMVisitor.stat b/demos/DOMVisitor/DOMVisitor.stat index b20b0b5d..26011f42 100644 --- a/demos/DOMVisitor/DOMVisitor.stat +++ b/demos/DOMVisitor/DOMVisitor.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=731 +EditorSecs=802 DesignerSecs=32 InspectorSecs=4 -CompileSecs=17759 -OtherSecs=85 +CompileSecs=18985 +OtherSecs=87 StartTime=12/08/2017 12:24:08 RealKeys=0 EffectiveKeys=0 diff --git a/demos/DOMVisitor/uDOMVisitor.pas b/demos/DOMVisitor/uDOMVisitor.pas index 950cd6e1..a6b02bdd 100644 --- a/demos/DOMVisitor/uDOMVisitor.pas +++ b/demos/DOMVisitor/uDOMVisitor.pas @@ -53,10 +53,9 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $100; - MINIBROWSER_VISITDOM = WM_APP + $101; + MINIBROWSER_VISITDOM = WM_APP + $101; - MINIBROWSER_CONTEXTMENU_VISITDOM = MENU_ID_USER_FIRST + 1; + MINIBROWSER_CONTEXTMENU_VISITDOM = MENU_ID_USER_FIRST + 1; DOMVISITOR_MSGNAME = 'domvisitor'; RETRIEVEDOM_MSGNAME = 'retrievedom'; @@ -86,7 +85,7 @@ type private { Private declarations } protected - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure VisitDOMMsg(var aMessage : TMessage); message MINIBROWSER_VISITDOM; procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; @@ -106,10 +105,9 @@ implementation uses uCEFProcessMessage; -procedure TDOMVisitorFrm.Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); +procedure TDOMVisitorFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TDOMVisitorFrm.Chromium1BeforeContextMenu(Sender: TObject; diff --git a/demos/FullScreenBrowser/FullScreenBrowser.dproj.local b/demos/FullScreenBrowser/FullScreenBrowser.dproj.local index 3acf1ce5..8c68bb2c 100644 --- a/demos/FullScreenBrowser/FullScreenBrowser.dproj.local +++ b/demos/FullScreenBrowser/FullScreenBrowser.dproj.local @@ -2,11 +2,11 @@ 2017/05/21 18:54:00.000.243,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/05/21 18:54:33.000.390,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.pas - 2017/05/21 18:54:33.000.390,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.dfm - 2017/05/21 18:54:43.000.194,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\Project1.dproj - 2017/05/21 18:54:50.000.736,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.dfm - 2017/05/21 18:54:50.000.736,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.pas - 2017/05/21 19:04:55.000.900,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\FullScreenBrowser.dproj + 2017/05/21 18:54:33.000.390,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm + 2017/05/21 18:54:33.000.390,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas + 2017/05/21 18:54:43.000.194,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/05/21 18:54:50.000.736,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.pas + 2017/05/21 18:54:50.000.736,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\uMainForm.dfm + 2017/05/21 19:04:55.000.900,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\FullScreenBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\Project1.dproj diff --git a/demos/FullScreenBrowser/FullScreenBrowser.dsk b/demos/FullScreenBrowser/FullScreenBrowser.dsk index 02fc69d3..2491fd18 100644 --- a/demos/FullScreenBrowser/FullScreenBrowser.dsk +++ b/demos/FullScreenBrowser/FullScreenBrowser.dsk @@ -12,20 +12,20 @@ File_9=TSourceModule,'c:\program files\embarcadero\studio\17.0\source\rtl\common [Modules] Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\FullScreenBrowser.dproj -Module2=default.htm +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\FullScreenBrowser.dproj Count=3 EditWindowCount=1 [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\FullScreenBrowser.dproj] -ModuleType=TBaseProject - [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\FullScreenBrowser.dproj] +ModuleType=TBaseProject + [EditWindow0] ViewCount=3 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.pas @@ -50,8 +50,8 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF @@ -59,6 +59,7 @@ BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -67,9 +68,9 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\FullScreenBrowser\uMainForm.pas -CursorX=61 -CursorY=132 -TopLine=105 +CursorX=59 +CursorY=117 +TopLine=35 LeftCol=1 Elisions= Bookmarks= @@ -151,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -188,12 +189,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=4383 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -300,25 +301,20 @@ Create=1 Visible=0 Docked=1 State=0 -Left=1 -Top=24 +Left=78 +Top=386 Width=1898 -Height=9137 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=7220 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 SplitPos=111 -[PropInspDesignerSelection] -ArrangeBy=Name -SelectedItem=Name,OnAfterCreated -ExpandedItems="LiveBindings Designer=0" - [frmDesignPreview] PercentageSizes=1 Create=1 @@ -363,8 +359,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -615,12 +611,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6794 +Width=1898 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -726,12 +722,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -747,14 +743,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=1 +Top=24 Width=1898 -Height=7220 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -764,22 +760,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=4383 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/FullScreenBrowser/FullScreenBrowser.stat b/demos/FullScreenBrowser/FullScreenBrowser.stat index ad41a6c7..a42bbf58 100644 --- a/demos/FullScreenBrowser/FullScreenBrowser.stat +++ b/demos/FullScreenBrowser/FullScreenBrowser.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=214 +EditorSecs=266 DesignerSecs=2 InspectorSecs=2 CompileSecs=13749 -OtherSecs=38 +OtherSecs=39 StartTime=01/06/2017 10:25:13 RealKeys=0 EffectiveKeys=0 diff --git a/demos/FullScreenBrowser/uMainForm.pas b/demos/FullScreenBrowser/uMainForm.pas index d07209de..10995304 100644 --- a/demos/FullScreenBrowser/uMainForm.pas +++ b/demos/FullScreenBrowser/uMainForm.pas @@ -48,10 +48,7 @@ uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, {$ENDIF} - uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFTypes; - -const - MINIBROWSER_CREATED = WM_APP + $100; + uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFTypes, uCEFConstants; type TMainForm = class(TForm) @@ -71,7 +68,7 @@ type protected procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure HandleKeyUp(const aMsg : TMsg; var aHandled : boolean); procedure HandleKeyDown(const aMsg : TMsg; var aHandled : boolean); @@ -117,10 +114,9 @@ begin if (TempKeyMsg.CharCode = VK_ESCAPE) then aHandled := True; end; -procedure TMainForm.Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); +procedure TMainForm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TMainForm.BrowserCreatedMsg(var aMessage : TMessage); diff --git a/demos/Geolocation/Geolocation.dproj.local b/demos/Geolocation/Geolocation.dproj.local index 37c7ce99..dee9a5ea 100644 --- a/demos/Geolocation/Geolocation.dproj.local +++ b/demos/Geolocation/Geolocation.dproj.local @@ -2,8 +2,8 @@ 2017/08/12 19:39:54.000.945,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/12 19:40:26.000.400,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/12 19:40:26.000.400,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm - 2017/08/12 19:40:30.000.902,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\Geolocation.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/08/12 19:40:26.000.400,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.pas + 2017/08/12 19:40:26.000.400,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.dfm + 2017/08/12 19:40:30.000.902,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\Geolocation.dproj diff --git a/demos/Geolocation/Geolocation.dsk b/demos/Geolocation/Geolocation.dsk index 45ad9eb3..1414116d 100644 --- a/demos/Geolocation/Geolocation.dsk +++ b/demos/Geolocation/Geolocation.dsk @@ -12,20 +12,20 @@ File_9=TSourceModule,'c:\program files\embarcadero\studio\17.0\source\rtl\common [Modules] Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\Geolocation.dproj -Module2=default.htm +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\Geolocation.dproj Count=3 EditWindowCount=1 [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\Geolocation.dproj] -ModuleType=TBaseProject - [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\Geolocation.dproj] +ModuleType=TBaseProject + [EditWindow0] ViewCount=3 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.pas @@ -50,8 +50,8 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF @@ -59,6 +59,7 @@ BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -78,9 +79,9 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\Geolocation\uGeolocation.pas -CursorX=98 -CursorY=84 -TopLine=71 +CursorX=80 +CursorY=79 +TopLine=68 LeftCol=1 Elisions= Bookmarks= @@ -151,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -188,12 +189,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=4383 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -300,14 +301,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=1 -Top=24 +Left=78 +Top=386 Width=1898 -Height=9137 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=7220 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -358,8 +359,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -610,12 +611,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6794 +Width=1898 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -721,12 +722,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -742,14 +743,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=1 +Top=24 Width=1898 -Height=7220 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -759,22 +760,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=4383 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/Geolocation/Geolocation.stat b/demos/Geolocation/Geolocation.stat index bf523fa9..7480dac4 100644 --- a/demos/Geolocation/Geolocation.stat +++ b/demos/Geolocation/Geolocation.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=711 +EditorSecs=770 DesignerSecs=20 InspectorSecs=51 -CompileSecs=13885 -OtherSecs=84 +CompileSecs=18369 +OtherSecs=93 StartTime=12/08/2017 20:07:20 RealKeys=0 EffectiveKeys=0 diff --git a/demos/Geolocation/uGeolocation.pas b/demos/Geolocation/uGeolocation.pas index 0d4a4914..154af8ea 100644 --- a/demos/Geolocation/uGeolocation.pas +++ b/demos/Geolocation/uGeolocation.pas @@ -52,8 +52,7 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $101; - MINIBROWSER_NEWLOCATION = WM_APP + $102; + MINIBROWSER_NEWLOCATION = WM_APP + $100; type TGeolocationFrm = class(TForm) @@ -64,18 +63,14 @@ type GoBtn: TButton; StatusBar1: TStatusBar; - procedure Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); + procedure Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); procedure GoBtnClick(Sender: TObject); - procedure FormShow(Sender: TObject);private - { Private declarations } + procedure FormShow(Sender: TObject); protected - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure NewLocationMsg(var aMessage : TMessage); message MINIBROWSER_NEWLOCATION; procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; - public - { Public declarations } end; var @@ -86,10 +81,9 @@ implementation {$R *.dfm} -procedure TGeolocationFrm.Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); +procedure TGeolocationFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TGeolocationFrm.FormShow(Sender: TObject); diff --git a/demos/JSEval/JSEval.dsk b/demos/JSEval/JSEval.dsk index c3267988..84f7653f 100644 --- a/demos/JSEval/JSEval.dsk +++ b/demos/JSEval/JSEval.dsk @@ -11,24 +11,24 @@ File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBinaryValue.pas',0,1,38,68,56,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\JSEval.dproj +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas Module1=default.htm -Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\JSEval.dproj Count=3 EditWindowCount=1 -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\JSEval.dproj] -ModuleType=TBaseProject - -[default.htm] -ModuleType=TURLModule - [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas] ModuleType=TSourceModule +[default.htm] +ModuleType=TURLModule + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\JSEval.dproj] +ModuleType=TBaseProject + [EditWindow0] ViewCount=3 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\JSEval.dpr +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas View0=0 View1=1 View2=2 @@ -49,15 +49,17 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 -RightPanelSize=0 +RightPanelSize=2000 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D3B3600000000000002E40500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0,DockSite2=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -68,7 +70,7 @@ CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\JSEval.dpr CursorX=60 CursorY=82 -TopLine=46 +TopLine=28 LeftCol=1 Elisions= Bookmarks= @@ -77,12 +79,12 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas -CursorX=1 -CursorY=155 -TopLine=116 +CursorX=39 +CursorY=161 +TopLine=37 LeftCol=1 Elisions= -Bookmarks={1,274,19}{2,300,34}{3,339,60}{4,422,1} +Bookmarks={1,275,19}{2,301,34}{3,340,60}{4,429,1} EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas [UndockedDesigner] @@ -102,11 +104,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -150,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8857 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8857 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -167,14 +169,14 @@ Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1357 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1357 -TBDockHeight=1357 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -188,11 +190,11 @@ State=0 Left=0 Top=0 Width=1875 -Height=6738 +Height=6794 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -302,12 +304,12 @@ State=0 Left=78 Top=386 Width=1898 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=7164 -TBDockHeight=7164 +ClientHeight=7220 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -321,12 +323,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -338,8 +340,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1210 -Top=-7 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -382,11 +384,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -401,11 +403,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -424,11 +426,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -443,11 +445,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -545,12 +547,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -584,11 +586,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -609,12 +611,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6738 +Width=1898 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -628,12 +630,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -696,12 +698,12 @@ State=0 Left=0 Top=18 Width=3820 -Height=1357 +Height=1424 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -710,22 +712,22 @@ ActiveTabID=DebugLogView TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=4 -Top=24 +Left=0 +Top=18 Width=2000 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9137 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -741,15 +743,15 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=1 +Top=24 Width=1898 -Height=7164 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 -TBDockHeight=7164 +ClientWidth=1898 +ClientHeight=9137 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -768,12 +770,12 @@ State=0 Left=0 Top=0 Width=2000 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 -TBDockHeight=7164 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/JSEval/JSEval.stat b/demos/JSEval/JSEval.stat index 953622bb..079b9071 100644 --- a/demos/JSEval/JSEval.stat +++ b/demos/JSEval/JSEval.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=10251 +EditorSecs=11459 DesignerSecs=14 InspectorSecs=2 -CompileSecs=174161 -OtherSecs=281 +CompileSecs=202850 +OtherSecs=317 StartTime=12/08/2017 14:17:43 RealKeys=0 EffectiveKeys=0 -DebugSecs=2045 +DebugSecs=2178 diff --git a/demos/JSEval/uJSEval.pas b/demos/JSEval/uJSEval.pas index 30c0c85e..ddc40f4a 100644 --- a/demos/JSEval/uJSEval.pas +++ b/demos/JSEval/uJSEval.pas @@ -53,13 +53,12 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $100; MINIBROWSER_SHOWTEXTVIEWER = WM_APP + $101; MINIBROWSER_EVALJSCODE = WM_APP + $102; - MINIBROWSER_EVALJSBINPARAM = WM_APP + $103; + MINIBROWSER_JSBINPARAM = WM_APP + $103; - MINIBROWSER_CONTEXTMENU_EVALJSCODE = MENU_ID_USER_FIRST + 1; - MINIBROWSER_CONTEXTMENU_EVALJSBINPARAM = MENU_ID_USER_FIRST + 2; + MINIBROWSER_CONTEXTMENU_EVALJSCODE = MENU_ID_USER_FIRST + 1; + MINIBROWSER_CONTEXTMENU_JSBINPARAM = MENU_ID_USER_FIRST + 2; EVAL_JS = 'JSContextEvalDemo'; BINARY_PARAM_JS = 'JSBinaryParameter'; @@ -92,10 +91,10 @@ type protected FText : string; - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure ShowTextViewerMsg(var aMessage : TMessage); message MINIBROWSER_SHOWTEXTVIEWER; procedure EvalJSCodeMsg(var aMessage : TMessage); message MINIBROWSER_EVALJSCODE; - procedure EvalJSBinParamMsg(var aMessage : TMessage); message MINIBROWSER_EVALJSBINPARAM; + procedure EvalJSBinParamMsg(var aMessage : TMessage); message MINIBROWSER_JSBINPARAM; procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; @@ -120,34 +119,37 @@ uses // Steps to evaluate some JavaScript code using the V8Context // ---------------------------------------------------------- -// 1. Create a TCefCustomRenderProcessHandler in the DPR file, adds a message name and sets the OnCustomMessage event. +// 1. Create a TCefCustomRenderProcessHandler in the DPR file, add a message name and set the OnCustomMessage event. // 2. Set the TCefCustomRenderProcessHandler in the GlobalCEFApp.RenderProcessHandler property. // 3. To get the Javascript code in this demo we use a context menu that sends a MINIBROWSER_EVALJSCODE to the form. // 4. The EvalJSCodeMsg asks for the Javascript code and sends it to the renderer using a process message. -// 5. RenderProcessHandler_OnProcessMessageReceivedEvent receives the process message and calls ParseEvalJsAnswer to evaluate the code -// 6. ParseEvalJsAnswer evaluates the code and sends a message with the results to the browser process using a process message. -// 7. Chromium1ProcessMessageReceived receives the message, stores the results and sends a MINIBROWSER_SHOWTEXTVIEWER -// message to the form. +// 5. RenderProcessHandler_OnProcessMessageReceivedEvent receives the process message and calls ParseEvalJsAnswer +// to evaluate the code. +// 6. ParseEvalJsAnswer evaluates the code and sends a message with the results to the browser process using a +// process message. +// 7. Chromium1ProcessMessageReceived receives the message, stores the results and sends a +// MINIBROWSER_SHOWTEXTVIEWER message to the form. // 8. ShowTextViewerMsg shows the results safely using a SimpleTextViewer. - // This demo also has an example of binary parameters in process messages // ---------------------------------------------------------------------- -// 1. Create a TCefCustomRenderProcessHandler in the DPR file, adds a message name and sets the OnCustomMessage event. +// 1. Create a TCefCustomRenderProcessHandler in the DPR file, add a message name and set the OnCustomMessage event. // 2. Set the TCefCustomRenderProcessHandler in the GlobalCEFApp.RenderProcessHandler property. -// 3. The context menu has a 'Send JPEG image' option that sends a MINIBROWSER_EVALJSBINPARAM message to the form. -// 4. EvalJSBinParamMsg asks for a JPEG image and sends a process message with a ICefBinaryValue parameter to the renderer process. -// 5. The renderer process parses the binary parameter in the ParseBinaryValue function and sends back the image size and encoded image data to the browser process. -// 6. Chromium1ProcessMessageReceived receives the message, stores the results and sends a MINIBROWSER_SHOWTEXTVIEWER -// message to the form. +// 3. The context menu has a 'Send JPEG image' option that sends a MINIBROWSER_JSBINPARAM message to the form. +// 4. EvalJSBinParamMsg asks for a JPEG image and sends a process message with a ICefBinaryValue parameter to the +// renderer process. +// 5. The renderer process parses the binary parameter in the ParseBinaryValue function and sends back the image +// size and encoded image data to the browser process. +// 6. Chromium1ProcessMessageReceived receives the message, stores the results and sends a +// MINIBROWSER_SHOWTEXTVIEWER message to the form. // 7. ShowTextViewerMsg shows the results safely using a SimpleTextViewer. // About binary parameters // ----------------------- // There is a size limit in the binary parameters of only a few kilobytes. -// For more info and alternatives, read this thread in the official CEF3 forum : +// For more info and alternatives read this thread in the official CEF3 forum : // http://www.magpcss.org/ceforum/viewtopic.php?f=6&t=10590 // // Compress the binary data if necessary! @@ -156,7 +158,7 @@ uses procedure TJSEvalFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TJSEvalFrm.Chromium1BeforeContextMenu(Sender : TObject; @@ -165,8 +167,8 @@ procedure TJSEvalFrm.Chromium1BeforeContextMenu(Sender : TObject; const params : ICefContextMenuParams; const model : ICefMenuModel); begin - model.AddItem(MINIBROWSER_CONTEXTMENU_EVALJSCODE, 'Evaluate JavaScript code...'); - model.AddItem(MINIBROWSER_CONTEXTMENU_EVALJSBINPARAM, 'Send JPEG image...'); + model.AddItem(MINIBROWSER_CONTEXTMENU_EVALJSCODE, 'Evaluate JavaScript code...'); + model.AddItem(MINIBROWSER_CONTEXTMENU_JSBINPARAM, 'Send JPEG image...'); end; procedure TJSEvalFrm.Chromium1ContextMenuCommand(Sender : TObject; @@ -180,8 +182,8 @@ begin Result := False; case commandId of - MINIBROWSER_CONTEXTMENU_EVALJSCODE : PostMessage(Handle, MINIBROWSER_EVALJSCODE, 0, 0); - MINIBROWSER_CONTEXTMENU_EVALJSBINPARAM : PostMessage(Handle, MINIBROWSER_EVALJSBINPARAM, 0, 0); + MINIBROWSER_CONTEXTMENU_EVALJSCODE : PostMessage(Handle, MINIBROWSER_EVALJSCODE, 0, 0); + MINIBROWSER_CONTEXTMENU_JSBINPARAM : PostMessage(Handle, MINIBROWSER_JSBINPARAM, 0, 0); end; end; @@ -240,13 +242,13 @@ end; procedure TJSEvalFrm.EvalJSBinParamMsg(var aMessage : TMessage); var - TempMsg : ICefProcessMessage; + TempMsg : ICefProcessMessage; TempOpenDialog : TOpenDialog; - TempStream : TFileStream; - TempBinValue : ICefBinaryValue; - TempBuffer : TBytes; - TempSize : NativeUInt; - TempPointer : pointer; + TempStream : TFileStream; + TempBinValue : ICefBinaryValue; + TempBuffer : TBytes; + TempSize : NativeUInt; + TempPointer : pointer; begin TempOpenDialog := nil; TempStream := nil; @@ -270,8 +272,7 @@ begin begin TempPointer := @TempBuffer[0]; TempBinValue := TCefBinaryValueRef.New(TempPointer, TempSize); - - TempMsg := TCefProcessMessageRef.New(BINARY_PARAM_JS); + TempMsg := TCefProcessMessageRef.New(BINARY_PARAM_JS); if TempMsg.ArgumentList.SetBinary(0, TempBinValue) then Chromium1.SendProcessMessage(PID_RENDERER, TempMsg); @@ -369,35 +370,41 @@ end; procedure TJSEvalFrm.ParseBinaryValue(const pBrowser : ICefBrowser; const aBinaryValue : ICefBinaryValue); var - pAnswer : ICefProcessMessage; - TempBuffer : TBytes; - TempPointer : pointer; - TempSize : NativeUInt; - TempString : string; + pAnswer : ICefProcessMessage; + TempBuffer : TBytes; + TempPointer : pointer; + TempSize : NativeUInt; + TempString : string; begin if (aBinaryValue = nil) then exit; - pAnswer := TCefProcessMessageRef.New(BINARY_PARAM_JS); - TempSize := aBinaryValue.GetSize; - - if (TempSize > 0) then - begin - SetLength(TempBuffer, TempSize); - TempPointer := @TempBuffer[0]; - TempSize := aBinaryValue.GetData(TempPointer, TempSize, 0); + try + try + TempSize := aBinaryValue.GetSize; if (TempSize > 0) then begin - TempString := EncodeBase64(TempPointer, TempSize); - TempString := 'Image size : ' + inttostr(TempSize) + #13 + #10 + - 'Encoded image : ' + TempString; + SetLength(TempBuffer, TempSize); + TempPointer := @TempBuffer[0]; + TempSize := aBinaryValue.GetData(TempPointer, TempSize, 0); - pAnswer.ArgumentList.SetString(0, TempString); - pBrowser.SendProcessMessage(PID_BROWSER, pAnswer); + if (TempSize > 0) then + begin + pAnswer := TCefProcessMessageRef.New(BINARY_PARAM_JS); + TempString := 'Image size : ' + inttostr(TempSize) + #13 + #10 + + 'Encoded image : ' + EncodeBase64(TempPointer, TempSize); + + if pAnswer.ArgumentList.SetString(0, TempString) then + pBrowser.SendProcessMessage(PID_BROWSER, pAnswer); + end; end; - - SetLength(TempBuffer, 0); + except + on e : exception do + if CustomExceptionHandler('TJSEvalFrm.ParseBinaryValue', e) then raise; end; + finally + SetLength(TempBuffer, 0); + end; end; procedure TJSEvalFrm.Chromium1ProcessMessageReceived(Sender : TObject; diff --git a/demos/JSExtension/JSExtension.dsk b/demos/JSExtension/JSExtension.dsk index 9311a687..83661b79 100644 --- a/demos/JSExtension/JSExtension.dsk +++ b/demos/JSExtension/JSExtension.dsk @@ -11,23 +11,23 @@ File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF [Modules] Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dproj -Module1=default.htm +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uJSExtension.pas -Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas +Module3=default.htm Count=4 EditWindowCount=1 [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dproj] ModuleType=TBaseProject -[default.htm] -ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas] +ModuleType=TSourceModule [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uJSExtension.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas] -ModuleType=TSourceModule +[default.htm] +ModuleType=TURLModule [EditWindow0] ViewCount=4 @@ -53,15 +53,17 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 -RightPanelSize=0 +RightPanelSize=2000 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D3B3600000000000002E40500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0,DockSite2=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -70,9 +72,9 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dpr -CursorX=1 -CursorY=97 -TopLine=60 +CursorX=2 +CursorY=89 +TopLine=51 LeftCol=1 Elisions= Bookmarks= @@ -80,26 +82,26 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView -Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas -CursorX=1 -CursorY=72 -TopLine=49 -LeftCol=1 -Elisions= -Bookmarks= -EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas - -[View3] -CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uJSExtension.pas -CursorX=79 -CursorY=165 -TopLine=152 +CursorX=57 +CursorY=126 +TopLine=120 LeftCol=1 Elisions= Bookmarks= EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uJSExtension.pas +[View3] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas +CursorX=75 +CursorY=67 +TopLine=31 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas + [UndockedDesigner] Count=0 @@ -117,11 +119,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -165,11 +167,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8857 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8857 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -182,14 +184,14 @@ Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1357 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1357 -TBDockHeight=1357 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -203,11 +205,11 @@ State=0 Left=0 Top=0 Width=1875 -Height=6738 +Height=6794 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -317,12 +319,12 @@ State=0 Left=78 Top=386 Width=1898 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=7164 -TBDockHeight=7164 +ClientHeight=7220 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -336,12 +338,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -353,8 +355,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1210 -Top=-7 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -397,11 +399,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -416,11 +418,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -439,11 +441,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -458,11 +460,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -560,12 +562,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -599,11 +601,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -625,11 +627,11 @@ State=0 Left=0 Top=0 Width=1773 -Height=6738 +Height=6794 MaxLeft=-1 MaxTop=-1 ClientWidth=1773 -ClientHeight=6738 +ClientHeight=6794 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -643,12 +645,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -711,12 +713,12 @@ State=0 Left=0 Top=18 Width=3820 -Height=1357 +Height=1424 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -725,22 +727,22 @@ ActiveTabID=DebugLogView TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=4 -Top=24 +Left=0 +Top=18 Width=2000 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9137 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -759,12 +761,12 @@ State=0 Left=0 Top=0 Width=1898 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1773 -ClientHeight=6738 -TBDockHeight=7164 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -783,12 +785,12 @@ State=0 Left=0 Top=0 Width=2000 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 -TBDockHeight=7164 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/JSExtension/JSExtension.stat b/demos/JSExtension/JSExtension.stat index 482ae0a6..c08fd0a1 100644 --- a/demos/JSExtension/JSExtension.stat +++ b/demos/JSExtension/JSExtension.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=4233 +EditorSecs=4637 DesignerSecs=28 InspectorSecs=43 -CompileSecs=181721 -OtherSecs=462 +CompileSecs=192587 +OtherSecs=474 StartTime=25/07/2017 22:09:15 RealKeys=0 EffectiveKeys=0 -DebugSecs=1042 +DebugSecs=1112 diff --git a/demos/JSExtension/uJSExtension.pas b/demos/JSExtension/uJSExtension.pas index 7607bcae..c1c7ab15 100644 --- a/demos/JSExtension/uJSExtension.pas +++ b/demos/JSExtension/uJSExtension.pas @@ -52,12 +52,14 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $100; - MINIBROWSER_SHOWTEXTVIEWER = WM_APP + $105; + MINIBROWSER_SHOWTEXTVIEWER = WM_APP + $100; MINIBROWSER_CONTEXTMENU_SETJSEVENT = MENU_ID_USER_FIRST + 1; MINIBROWSER_CONTEXTMENU_JSVISITDOM = MENU_ID_USER_FIRST + 2; + MOUSEOVER_MESSAGE_NAME = 'mouseover'; + CUSTOMNAME_MESSAGE_NAME = 'customname'; + type TJSExtensionFrm = class(TForm) NavControlPnl: TPanel; @@ -78,12 +80,11 @@ type procedure Chromium1ProcessMessageReceived(Sender: TObject; const browser: ICefBrowser; sourceProcess: TCefProcessId; const message: ICefProcessMessage; out Result: Boolean); - procedure Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); + procedure Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); protected FText : string; - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure ShowTextViewerMsg(var aMessage : TMessage); message MINIBROWSER_SHOWTEXTVIEWER; procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; @@ -125,10 +126,9 @@ begin Chromium1.LoadURL(Edit1.Text); end; -procedure TJSExtensionFrm.Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); +procedure TJSExtensionFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TJSExtensionFrm.Chromium1BeforeContextMenu(Sender: TObject; @@ -167,7 +167,7 @@ begin if (browser <> nil) and (browser.MainFrame <> nil) then browser.MainFrame.ExecuteJavaScript( 'var testhtml = document.body.innerHTML;' + - 'myextension.sendresulttobrowser(testhtml, ''customname'');', // This is the call from JavaScript to the extension with DELPHI code in uTestExtension.pas + 'myextension.sendresulttobrowser(testhtml, ' + quotedstr(CUSTOMNAME_MESSAGE_NAME) + ');', // This is the call from JavaScript to the extension with DELPHI code in uTestExtension.pas 'about:blank', 0); end; end; @@ -187,13 +187,13 @@ begin // The message names are defined in the extension or in JS code. - if (message.Name = 'mouseover') then + if (message.Name = MOUSEOVER_MESSAGE_NAME) then begin StatusBar1.Panels[0].Text := message.ArgumentList.GetString(0); // this doesn't create/destroy components Result := True; end else - if (message.Name = 'customname') then + if (message.Name = CUSTOMNAME_MESSAGE_NAME) then begin FText := message.ArgumentList.GetString(0); PostMessage(Handle, MINIBROWSER_SHOWTEXTVIEWER, 0, 0); diff --git a/demos/JSExtension/uTestExtension.pas b/demos/JSExtension/uTestExtension.pas index 4f182b6d..7f34cde7 100644 --- a/demos/JSExtension/uTestExtension.pas +++ b/demos/JSExtension/uTestExtension.pas @@ -59,13 +59,13 @@ type implementation uses - uCEFMiscFunctions, uCEFConstants; + uCEFMiscFunctions, uCEFConstants, uJSExtension; class procedure TTestExtension.mouseover(const data: string); var msg: ICefProcessMessage; begin - msg := TCefProcessMessageRef.New('mouseover'); + msg := TCefProcessMessageRef.New(MOUSEOVER_MESSAGE_NAME); msg.ArgumentList.SetString(0, data); // Sending a message back to the browser. It'll be received in the TChromium.OnProcessMessageReceived event. diff --git a/demos/MDIBrowser/MDIBrowser.dproj.local b/demos/MDIBrowser/MDIBrowser.dproj.local index 785999d0..14b2383a 100644 --- a/demos/MDIBrowser/MDIBrowser.dproj.local +++ b/demos/MDIBrowser/MDIBrowser.dproj.local @@ -2,10 +2,10 @@ 2017/05/01 10:03:03.000.353,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\about.pas= - 2017/05/01 11:22:18.000.397,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIAPP.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIBrowser.dproj - 2017/05/01 12:25:35.000.397,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\Main.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas - 2017/05/01 12:25:35.000.397,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\Main.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.dfm - 2017/05/01 12:26:13.000.106,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\ChildWin.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas - 2017/05/01 12:26:13.000.106,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\ChildWin.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.dfm + 2017/05/01 11:22:18.000.397,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIAPP.dproj + 2017/05/01 12:25:35.000.397,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\Main.pas + 2017/05/01 12:25:35.000.397,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\Main.dfm + 2017/05/01 12:26:13.000.106,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\ChildWin.dfm + 2017/05/01 12:26:13.000.106,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\ChildWin.pas diff --git a/demos/MDIBrowser/MDIBrowser.dsk b/demos/MDIBrowser/MDIBrowser.dsk index 94a8f6e4..c004f903 100644 --- a/demos/MDIBrowser/MDIBrowser.dsk +++ b/demos/MDIBrowser/MDIBrowser.dsk @@ -1,36 +1,40 @@ [Closed Files] -File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas',0,1,69,66,118,0,0,, -File_1=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Forms.pas',0,1,6306,1,6308,0,0,{{1729,4} -File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,53,20,81,0,0,, -File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas',0,1,1,22,38,0,0,, -File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,1091,3,1120,0,0,, -File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,626,1,663,0,0,, -File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas',0,1,1,1,1,0,0,, -File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,289,21,334,0,0,, -File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFClient.pas',0,1,24,90,42,0,0,,{1 +File_0=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Forms.pas',0,1,6306,1,6308,0,0,{{1729,4} +File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,53,20,81,0,0,, +File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas',0,1,1,22,38,0,0,, +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,1091,3,1120,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,626,1,663,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas',0,1,1,1,1,0,0,, +File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,289,21,334,0,0,, +File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFClient.pas',0,1,24,90,42,0,0,,{1 [Modules] Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIBrowser.dproj +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas Module2=default.htm -Count=3 +Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIBrowser.dproj +Count=4 EditWindowCount=1 [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIBrowser.dproj] -ModuleType=TBaseProject +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas] +ModuleType=TSourceModule [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\MDIBrowser.dproj] +ModuleType=TBaseProject + [EditWindow0] -ViewCount=3 +ViewCount=4 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas View0=0 View1=1 View2=2 +View3=3 PercentageSizes=1 Create=1 Visible=1 @@ -49,8 +53,8 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF @@ -58,6 +62,7 @@ BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -77,14 +82,25 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas -CursorX=31 -CursorY=172 -TopLine=155 +CursorX=15 +CursorY=80 +TopLine=65 LeftCol=1 Elisions= Bookmarks= EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas +[View3] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas +CursorX=3 +CursorY=56 +TopLine=31 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas + [UndockedDesigner] Count=0 @@ -150,11 +166,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -187,12 +203,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=4383 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -299,14 +315,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=1 -Top=24 +Left=78 +Top=386 Width=1898 -Height=9137 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=7220 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -357,8 +373,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -609,12 +625,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6794 +Width=1898 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -720,12 +736,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -741,14 +757,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=1 +Top=24 Width=1898 -Height=7220 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -758,22 +774,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=4383 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/MDIBrowser/MDIBrowser.stat b/demos/MDIBrowser/MDIBrowser.stat index 320c46c6..089b4080 100644 --- a/demos/MDIBrowser/MDIBrowser.stat +++ b/demos/MDIBrowser/MDIBrowser.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=5379 +EditorSecs=5424 DesignerSecs=25 InspectorSecs=4 CompileSecs=157087 -OtherSecs=360 +OtherSecs=361 StartTime=01/05/2017 12:55:55 RealKeys=0 EffectiveKeys=0 diff --git a/demos/MiniBrowser/MiniBrowser.dsk b/demos/MiniBrowser/MiniBrowser.dsk index df0e410a..1b54db12 100644 --- a/demos/MiniBrowser/MiniBrowser.dsk +++ b/demos/MiniBrowser/MiniBrowser.dsk @@ -1,21 +1,25 @@ [Closed Files] -File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas',0,1,134,80,161,0,0,,{1 -File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,2968,47,2983,0,0,, -File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,70,37,58,0,0,, -File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFWindowParent.pas',0,1,65,27,66,0,0,, -File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,246,22,279,0,0,, -File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPostData.pas',0,1,97,1,134,0,0,, -File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,404,1,434,0,0,, -File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFRequest.pas',0,1,104,1,126,0,0,, -File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFRequestHandler.pas',0,1,115,1,118,0,0,, -File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,547,7,568,0,0,, +File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,194,16,223,0,0,, +File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,1065,56,1098,0,0,, +File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,1712,23,1740,0,0,, +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas',0,1,79,1,88,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,70,37,58,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFWindowParent.pas',0,1,65,27,66,0,0,, +File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,246,22,279,0,0,, +File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPostData.pas',0,1,97,1,134,0,0,, +File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFRequest.pas',0,1,104,1,126,0,0,, +File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFRequestHandler.pas',0,1,115,1,118,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\MiniBrowser.dproj -Module1=default.htm -Count=2 +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\MiniBrowser.dproj +Module2=default.htm +Count=3 EditWindowCount=1 +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas] +ModuleType=TSourceModule + [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\MiniBrowser.dproj] ModuleType=TBaseProject @@ -23,10 +27,11 @@ ModuleType=TBaseProject ModuleType=TURLModule [EditWindow0] -ViewCount=2 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\MiniBrowser.dpr +ViewCount=3 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas View0=0 View1=1 +View2=2 PercentageSizes=1 Create=1 Visible=1 @@ -44,15 +49,17 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 -RightPanelSize=0 -BottomPanelSize=0 +RightPanelSize=2000 +RightPanelClients=DockSite2 +RightPanelData=00000800010000000000972300000000000000D90A00000000000001000000009723000009000000446F636B5369746532FFFFFFFF +BottomPanelSize=1551 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D3B3600000000000002E40500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020100000009000000446F636B53697465313B36000000000000020F0600000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0,DockSite2=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -69,6 +76,17 @@ Elisions= Bookmarks= EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\MiniBrowser.dpr +[View2] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas +CursorX=89 +CursorY=231 +TopLine=578 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas + [UndockedDesigner] Count=0 @@ -86,11 +104,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1121 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -134,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8857 +Height=7265 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8857 +ClientHeight=7265 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -147,18 +165,18 @@ StayOnTop=0 [MessageView] PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 Top=18 Width=10000 -Height=1357 +Height=1401 MaxLeft=-1 MaxTop=-1 ClientWidth=10000 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1401 +TBDockHeight=1401 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -305,12 +323,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -322,8 +340,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1210 -Top=-7 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -366,11 +384,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1121 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -385,11 +403,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1121 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -408,11 +426,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1121 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -427,11 +445,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1121 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -529,12 +547,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -568,11 +586,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1121 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -612,12 +630,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -680,12 +698,12 @@ State=0 Left=0 Top=18 Width=3820 -Height=1357 +Height=1401 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1401 +TBDockHeight=1401 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -694,21 +712,21 @@ ActiveTabID=DebugLogView TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=4 -Top=24 +Left=0 +Top=18 Width=2000 -Height=9137 +Height=7545 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9137 +ClientHeight=7545 TBDockHeight=7164 LRDockWidth=2000 Dockable=1 diff --git a/demos/MiniBrowser/MiniBrowser.stat b/demos/MiniBrowser/MiniBrowser.stat index ba4ff591..6cabc53d 100644 --- a/demos/MiniBrowser/MiniBrowser.stat +++ b/demos/MiniBrowser/MiniBrowser.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=46531 -DesignerSecs=2443 -InspectorSecs=1781 -CompileSecs=2516644 -OtherSecs=7360 +EditorSecs=47251 +DesignerSecs=2448 +InspectorSecs=1794 +CompileSecs=2563039 +OtherSecs=7418 StartTime=11/02/2017 10:51:15 RealKeys=0 EffectiveKeys=0 -DebugSecs=37790 +DebugSecs=38530 diff --git a/demos/MiniBrowser/uMiniBrowser.dfm b/demos/MiniBrowser/uMiniBrowser.dfm index 547b7eba..3a03502d 100644 --- a/demos/MiniBrowser/uMiniBrowser.dfm +++ b/demos/MiniBrowser/uMiniBrowser.dfm @@ -134,6 +134,7 @@ object MiniBrowserFrm: TMiniBrowserFrm 'https://www.w3schools.com/js/tryit.asp?filename=tryjs_win_close' 'https://www.w3schools.com/html/html5_video.asp' 'http://www.adobe.com/software/flash/about/' + 'http://isflashinstalled.com/' 'chrome://version/' 'http://html5test.com/' 'https://www.w3schools.com/' diff --git a/demos/MiniBrowser/uMiniBrowser.pas b/demos/MiniBrowser/uMiniBrowser.pas index 9f5e6e17..880c6dfe 100644 --- a/demos/MiniBrowser/uMiniBrowser.pas +++ b/demos/MiniBrowser/uMiniBrowser.pas @@ -53,7 +53,6 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $100; MINIBROWSER_SHOWDEVTOOLS = WM_APP + $101; MINIBROWSER_HIDEDEVTOOLS = WM_APP + $102; MINIBROWSER_COPYHTML = WM_APP + $103; @@ -168,7 +167,7 @@ type procedure HandleKeyUp(const aMsg : TMsg; var aHandled : boolean); procedure HandleKeyDown(const aMsg : TMsg; var aHandled : boolean); - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure ShowDevToolsMsg(var aMessage : TMessage); message MINIBROWSER_SHOWDEVTOOLS; procedure HideDevToolsMsg(var aMessage : TMessage); message MINIBROWSER_HIDEDEVTOOLS; procedure CopyHTMLMsg(var aMessage : TMessage); message MINIBROWSER_COPYHTML; @@ -222,10 +221,9 @@ begin AddURL(url); end; -procedure TMiniBrowserFrm.Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); +procedure TMiniBrowserFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TMiniBrowserFrm.Chromium1BeforeContextMenu(Sender: TObject; diff --git a/demos/PostDataInspector/PostDataInspector.dproj.local b/demos/PostDataInspector/PostDataInspector.dproj.local index d7f30d1b..c83ee7de 100644 --- a/demos/PostDataInspector/PostDataInspector.dproj.local +++ b/demos/PostDataInspector/PostDataInspector.dproj.local @@ -2,8 +2,8 @@ 2017/08/22 17:55:36.000.110,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/22 17:56:41.000.668,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/22 17:56:41.000.668,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm - 2017/08/22 17:56:48.000.691,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\PostDataInspector.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/08/22 17:56:41.000.668,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.pas + 2017/08/22 17:56:41.000.668,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.dfm + 2017/08/22 17:56:48.000.691,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\PostDataInspector.dproj diff --git a/demos/PostDataInspector/PostDataInspector.dsk b/demos/PostDataInspector/PostDataInspector.dsk index 5115bf87..79ab2dce 100644 --- a/demos/PostDataInspector/PostDataInspector.dsk +++ b/demos/PostDataInspector/PostDataInspector.dsk @@ -12,20 +12,20 @@ File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF [Modules] Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\PostDataInspector.dproj -Module2=default.htm +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\PostDataInspector.dproj Count=3 EditWindowCount=1 [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\PostDataInspector.dproj] -ModuleType=TBaseProject - [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\PostDataInspector.dproj] +ModuleType=TBaseProject + [EditWindow0] ViewCount=3 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.pas @@ -50,8 +50,8 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF @@ -59,6 +59,7 @@ BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -78,9 +79,9 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\PostDataInspector\uPostDataInspector.pas -CursorX=31 -CursorY=154 -TopLine=152 +CursorX=71 +CursorY=97 +TopLine=27 LeftCol=1 Elisions= Bookmarks= @@ -151,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -188,12 +189,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=4383 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -300,14 +301,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=1 -Top=24 +Left=78 +Top=386 Width=1898 -Height=9137 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=7220 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 @@ -358,8 +359,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -721,12 +722,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -759,22 +760,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=4383 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=4383 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/PostDataInspector/PostDataInspector.identcache b/demos/PostDataInspector/PostDataInspector.identcache index 1a330939..88f37160 100644 Binary files a/demos/PostDataInspector/PostDataInspector.identcache and b/demos/PostDataInspector/PostDataInspector.identcache differ diff --git a/demos/PostDataInspector/PostDataInspector.stat b/demos/PostDataInspector/PostDataInspector.stat index 132e76be..c3cd077a 100644 --- a/demos/PostDataInspector/PostDataInspector.stat +++ b/demos/PostDataInspector/PostDataInspector.stat @@ -1,5 +1,5 @@ [Stats] -EditorSecs=778 +EditorSecs=821 DesignerSecs=1 InspectorSecs=1 CompileSecs=33218 diff --git a/demos/PostDataInspector/uPostDataInspector.pas b/demos/PostDataInspector/uPostDataInspector.pas index 9351fe65..2f57aeae 100644 --- a/demos/PostDataInspector/uPostDataInspector.pas +++ b/demos/PostDataInspector/uPostDataInspector.pas @@ -52,9 +52,7 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $100; - - POSTDATA_MSGNAME = 'postdatainfo'; + POSTDATA_MSGNAME = 'postdatainfo'; type TPostDataInspectorFrm = class(TForm) @@ -73,7 +71,7 @@ type const browser: ICefBrowser); protected - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; public @@ -96,10 +94,9 @@ implementation // If you need more control over the POST data register an scheme. // See the SchemeRegistrationBrowser demo. -procedure TPostDataInspectorFrm.Chromium1AfterCreated(Sender: TObject; - const browser: ICefBrowser); +procedure TPostDataInspectorFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TPostDataInspectorFrm.Chromium1ProcessMessageReceived( diff --git a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dproj.local b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dproj.local index 187cb5db..128194ac 100644 --- a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dproj.local +++ b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dproj.local @@ -2,9 +2,9 @@ 2017/08/12 11:25:15.000.051,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/08/12 11:26:00.000.707,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas - 2017/08/12 11:26:00.000.707,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.dfm - 2017/08/12 11:26:06.000.294,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dproj + 2017/08/12 11:26:00.000.707,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas + 2017/08/12 11:26:00.000.707,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm + 2017/08/12 11:26:06.000.294,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj 2017/08/12 11:27:56.000.909,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uHelloScheme.pas diff --git a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dsk b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dsk index 98349959..e5abd7af 100644 --- a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dsk +++ b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dsk @@ -9,32 +9,37 @@ File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas',0,1,156,3,83,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dproj -Module1=default.htm -Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas -Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uHelloScheme.pas -Count=4 +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dproj +Module3=default.htm +Module4=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uHelloScheme.pas +Count=5 EditWindowCount=1 +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas] +ModuleType=TSourceModule + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas] +ModuleType=TSourceModule + [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dproj] ModuleType=TBaseProject [default.htm] ModuleType=TURLModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas] -ModuleType=TSourceModule - [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uHelloScheme.pas] ModuleType=TSourceModule [EditWindow0] -ViewCount=4 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dpr +ViewCount=5 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas View0=0 View1=1 View2=2 View3=3 +View4=4 PercentageSizes=1 Create=1 Visible=1 @@ -52,15 +57,17 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 -RightPanelSize=0 +RightPanelSize=2000 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D3B3600000000000002E40500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0,DockSite2=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -80,9 +87,9 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas -CursorX=59 -CursorY=158 -TopLine=125 +CursorX=63 +CursorY=97 +TopLine=43 LeftCol=1 Elisions= Bookmarks= @@ -90,6 +97,17 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View3] CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas +CursorX=19 +CursorY=362 +TopLine=349 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas + +[View4] +CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uHelloScheme.pas CursorX=53 CursorY=138 @@ -116,11 +134,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -164,11 +182,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8857 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8857 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -181,14 +199,14 @@ Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1357 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1357 -TBDockHeight=1357 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -202,11 +220,11 @@ State=0 Left=0 Top=0 Width=1875 -Height=6738 +Height=6794 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -316,12 +334,12 @@ State=0 Left=78 Top=386 Width=1898 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=7164 -TBDockHeight=7164 +ClientHeight=7220 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -335,12 +353,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -352,8 +370,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1210 -Top=-7 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -396,11 +414,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -415,11 +433,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -438,11 +456,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -457,11 +475,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -559,12 +577,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -598,11 +616,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -623,12 +641,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6738 +Width=1898 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 +ClientWidth=1898 +ClientHeight=9137 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -642,12 +660,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -710,12 +728,12 @@ State=0 Left=0 Top=18 Width=3820 -Height=1357 +Height=1424 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -724,22 +742,22 @@ ActiveTabID=DebugLogView TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=4 -Top=24 +Left=0 +Top=18 Width=2000 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9137 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -755,15 +773,15 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=1 +Top=24 Width=1898 -Height=7164 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 -TBDockHeight=7164 +ClientWidth=1898 +ClientHeight=9137 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -782,12 +800,12 @@ State=0 Left=0 Top=0 Width=2000 -Height=7164 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1875 -ClientHeight=6738 -TBDockHeight=7164 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat index ef6b3756..780db412 100644 --- a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat +++ b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=137 +EditorSecs=191 DesignerSecs=6 InspectorSecs=1 -CompileSecs=9132 -OtherSecs=25 +CompileSecs=9494 +OtherSecs=27 StartTime=12/08/2017 16:06:01 RealKeys=0 EffectiveKeys=0 diff --git a/demos/SchemeRegistrationBrowser/uSchemeRegistrationBrowser.pas b/demos/SchemeRegistrationBrowser/uSchemeRegistrationBrowser.pas index 228dad76..97549db1 100644 --- a/demos/SchemeRegistrationBrowser/uSchemeRegistrationBrowser.pas +++ b/demos/SchemeRegistrationBrowser/uSchemeRegistrationBrowser.pas @@ -53,8 +53,6 @@ uses uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants; const - MINIBROWSER_CREATED = WM_APP + $100; - MINIBROWSER_CONTEXTMENU_REGSCHEME = MENU_ID_USER_FIRST + 1; MINIBROWSER_CONTEXTMENU_CLEARFACT = MENU_ID_USER_FIRST + 2; @@ -79,7 +77,7 @@ type private { Private declarations } protected - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; public @@ -96,10 +94,9 @@ implementation uses uCEFSchemeHandlerFactory, uHelloScheme; -procedure TSchemeRegistrationBrowserFrm.Chromium1AfterCreated( - Sender: TObject; const browser: ICefBrowser); +procedure TSchemeRegistrationBrowserFrm.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TSchemeRegistrationBrowserFrm.Chromium1BeforeContextMenu( diff --git a/demos/SimpleBrowser/SimpleBrowser.dproj.local b/demos/SimpleBrowser/SimpleBrowser.dproj.local index 3aa584d9..0d6eeadf 100644 --- a/demos/SimpleBrowser/SimpleBrowser.dproj.local +++ b/demos/SimpleBrowser/SimpleBrowser.dproj.local @@ -2,8 +2,8 @@ 2017/01/22 14:37:05.000.577,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/01/22 14:41:11.000.096,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi demos\SimpleBrowser\uSimpleBrowser.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm - 2017/01/22 14:41:11.000.096,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi demos\SimpleBrowser\uSimpleBrowser.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/01/22 14:41:18.000.226,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi demos\SimpleBrowser\SimpleBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/01/22 14:41:11.000.096,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi demos\SimpleBrowser\uSimpleBrowser.pas + 2017/01/22 14:41:11.000.096,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi demos\SimpleBrowser\uSimpleBrowser.dfm + 2017/01/22 14:41:18.000.226,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi demos\SimpleBrowser\SimpleBrowser.dproj diff --git a/demos/SimpleBrowser/SimpleBrowser.dsk b/demos/SimpleBrowser/SimpleBrowser.dsk index a6570a18..3999e5d3 100644 --- a/demos/SimpleBrowser/SimpleBrowser.dsk +++ b/demos/SimpleBrowser/SimpleBrowser.dsk @@ -11,24 +11,24 @@ File_8=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Fo File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFLifeSpanHandler.pas',0,1,99,1,121,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas -Module1=default.htm -Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dproj +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=default.htm Count=3 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 [default.htm] ModuleType=TURLModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dproj] -ModuleType=TBaseProject - [EditWindow0] ViewCount=3 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr View0=0 View1=1 View2=2 @@ -48,17 +48,20 @@ ClientHeight=9417 DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 -LeftPanelSize=0 +LeftPanelSize=1898 +LeftPanelClients=PropertyInspector +LeftPanelData=00000800010000000000D61B0000000000000000000000000000000100000000D61B00001100000050726F7065727479496E73706563746F72FFFFFFFF RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000161500000000000001D00700000000000001000000004312000009000000446F636B53697465320100000000471D000009000000446F636B5369746534FFFFFFFF -BottomPanelSize=1551 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF +BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020100000009000000446F636B53697465313B36000000000000020F0600000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF -TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockLeftClients=DockSite3=0 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -68,7 +71,7 @@ WelcomePageURL=bds:/default.htm CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr CursorX=2 -CursorY=60 +CursorY=67 TopLine=37 LeftCol=1 Elisions= @@ -78,9 +81,9 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas -CursorX=71 -CursorY=71 -TopLine=45 +CursorX=15 +CursorY=85 +TopLine=50 LeftCol=1 Elisions= Bookmarks= @@ -151,11 +154,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -164,18 +167,18 @@ StayOnTop=0 [MessageView] PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1401 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1401 -TBDockHeight=1401 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -188,12 +191,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=2713 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=2713 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -297,23 +300,28 @@ StayOnTop=0 [PropertyInspector] PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=1 -Top=24 +Left=0 +Top=18 Width=1898 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=9215 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 SplitPos=111 +[PropInspDesignerSelection] +ArrangeBy=Name +SelectedItem=Name,CustomHint +ExpandedItems=Anchors=0,Constraints=0,LiveBindings=0,"LiveBindings Designer=0",Margins=0,BevelEdges=0,Font=0,Padding=0,StyleElements=0,Touch=0,ImageMargins=0 + [frmDesignPreview] PercentageSizes=1 Create=1 @@ -358,8 +366,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -721,12 +729,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -759,22 +767,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=2713 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=2713 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/SimpleBrowser/SimpleBrowser.stat b/demos/SimpleBrowser/SimpleBrowser.stat index bd2dbe68..9a583ed5 100644 --- a/demos/SimpleBrowser/SimpleBrowser.stat +++ b/demos/SimpleBrowser/SimpleBrowser.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=4750 -DesignerSecs=301 -InspectorSecs=137 -CompileSecs=367837 -OtherSecs=1083 +EditorSecs=4856 +DesignerSecs=331 +InspectorSecs=170 +CompileSecs=375226 +OtherSecs=1112 StartTime=22/01/2017 14:51:01 RealKeys=0 EffectiveKeys=0 -DebugSecs=2402 +DebugSecs=2434 diff --git a/demos/SimpleBrowser/uSimpleBrowser.dfm b/demos/SimpleBrowser/uSimpleBrowser.dfm index 07689cad..0c1d50d4 100644 --- a/demos/SimpleBrowser/uSimpleBrowser.dfm +++ b/demos/SimpleBrowser/uSimpleBrowser.dfm @@ -22,24 +22,23 @@ object Form1: TForm1 Height = 594 Align = alClient TabOrder = 0 - ExplicitWidth = 684 - ExplicitHeight = 532 + OnAfterCreated = ChromiumWindow1AfterCreated end - object Panel1: TPanel + object AddressPnl: TPanel Left = 0 Top = 0 Width = 1038 Height = 30 Align = alTop BevelOuter = bvNone + Enabled = False Padding.Left = 5 Padding.Top = 5 Padding.Right = 5 Padding.Bottom = 5 ShowCaption = False TabOrder = 1 - ExplicitWidth = 684 - object Edit1: TEdit + object AddressEdt: TEdit Left = 5 Top = 5 Width = 997 @@ -48,10 +47,9 @@ object Form1: TForm1 Align = alClient TabOrder = 0 Text = 'http://www.google.com' - ExplicitWidth = 643 ExplicitHeight = 21 end - object Button1: TButton + object GoBtn: TButton Left = 1002 Top = 5 Width = 31 @@ -60,8 +58,7 @@ object Form1: TForm1 Align = alRight Caption = 'Go' TabOrder = 1 - OnClick = Button1Click - ExplicitLeft = 648 + OnClick = GoBtnClick end end end diff --git a/demos/SimpleBrowser/uSimpleBrowser.pas b/demos/SimpleBrowser/uSimpleBrowser.pas index c3666deb..246e203c 100644 --- a/demos/SimpleBrowser/uSimpleBrowser.pas +++ b/demos/SimpleBrowser/uSimpleBrowser.pas @@ -54,11 +54,12 @@ uses type TForm1 = class(TForm) ChromiumWindow1: TChromiumWindow; - Panel1: TPanel; - Edit1: TEdit; - Button1: TButton; - procedure Button1Click(Sender: TObject); + AddressPnl: TPanel; + AddressEdt: TEdit; + GoBtn: TButton; + procedure GoBtnClick(Sender: TObject); procedure FormShow(Sender: TObject); + procedure ChromiumWindow1AfterCreated(Sender: TObject); private procedure WMMove(var aMessage : TWMMove); message WM_MOVE; procedure WMMoving(var aMessage : TMessage); message WM_MOVING; @@ -73,9 +74,15 @@ implementation {$R *.dfm} -procedure TForm1.Button1Click(Sender: TObject); +procedure TForm1.GoBtnClick(Sender: TObject); begin - ChromiumWindow1.LoadURL(Edit1.Text); + ChromiumWindow1.LoadURL(AddressEdt.Text); +end; + +procedure TForm1.ChromiumWindow1AfterCreated(Sender: TObject); +begin + AddressPnl.Enabled := True; + GoBtn.Click; end; procedure TForm1.FormShow(Sender: TObject); diff --git a/demos/SimpleOSRBrowser/SimpleOSRBrowser.dsk b/demos/SimpleOSRBrowser/SimpleOSRBrowser.dsk index 96eec4ba..f2e85760 100644 --- a/demos/SimpleOSRBrowser/SimpleOSRBrowser.dsk +++ b/demos/SimpleOSRBrowser/SimpleOSRBrowser.dsk @@ -10,27 +10,32 @@ File_7=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Fo File_8=TSourceModule,'c:\program files\embarcadero\studio\17.0\SOURCE\VCL\Vcl.Controls.pas',0,1,10019,18,10051,0,0,, [Modules] -Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\uSimpleOSRBrowser.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\SimpleOSRBrowser.dproj -Module2=default.htm -Count=3 +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\SimpleOSRBrowser.dproj +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\uSimpleOSRBrowser.pas +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas +Module3=default.htm +Count=4 EditWindowCount=1 +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\SimpleOSRBrowser.dproj] +ModuleType=TBaseProject + [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\uSimpleOSRBrowser.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\SimpleOSRBrowser.dproj] -ModuleType=TBaseProject +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas] +ModuleType=TSourceModule [default.htm] ModuleType=TURLModule [EditWindow0] -ViewCount=3 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\uSimpleOSRBrowser.pas +ViewCount=4 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\SimpleOSRBrowser.dpr View0=0 View1=1 View2=2 +View3=3 PercentageSizes=1 Create=1 Visible=1 @@ -49,15 +54,16 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000161500000000000001D00700000000000001000000004312000009000000446F636B53697465320100000000471D000009000000446F636B5369746534FFFFFFFF -BottomPanelSize=1551 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF +BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020100000009000000446F636B53697465313B36000000000000020F0600000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF -TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockLeftClients=DockSite3=0,PropertyInspector=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -66,8 +72,8 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\SimpleOSRBrowser.dpr -CursorX=67 -CursorY=68 +CursorX=4 +CursorY=71 TopLine=37 LeftCol=1 Elisions= @@ -77,14 +83,25 @@ EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\d [View2] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\uSimpleOSRBrowser.pas -CursorX=73 -CursorY=78 -TopLine=69 +CursorX=63 +CursorY=240 +TopLine=212 LeftCol=1 Elisions= Bookmarks={1,257,10}{2,328,1}{3,437,1} EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleOSRBrowser\uSimpleOSRBrowser.pas +[View3] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas +CursorX=19 +CursorY=362 +TopLine=340 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas + [UndockedDesigner] Count=0 @@ -150,11 +167,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -163,18 +180,18 @@ StayOnTop=0 [MessageView] PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1401 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1401 -TBDockHeight=1401 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -187,12 +204,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=2713 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=2713 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -299,20 +316,25 @@ Create=1 Visible=0 Docked=1 State=0 -Left=1 -Top=24 +Left=0 +Top=18 Width=1898 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=9215 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 SplitPos=111 +[PropInspDesignerSelection] +ArrangeBy=Name +SelectedItem=,CustomHint +ExpandedItems=Anchors=0,Constraints=0,LiveBindings=0,"LiveBindings Designer=0",Margins=0,BevelEdges=0,Font=0,Padding=0,StyleElements=0,Touch=0,ImageMargins=0 + [frmDesignPreview] PercentageSizes=1 Create=1 @@ -357,8 +379,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -720,12 +742,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -758,22 +780,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=2713 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=2713 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/SimpleOSRBrowser/SimpleOSRBrowser.res b/demos/SimpleOSRBrowser/SimpleOSRBrowser.res index 20ba5530..d57a07fd 100644 Binary files a/demos/SimpleOSRBrowser/SimpleOSRBrowser.res and b/demos/SimpleOSRBrowser/SimpleOSRBrowser.res differ diff --git a/demos/SimpleOSRBrowser/SimpleOSRBrowser.stat b/demos/SimpleOSRBrowser/SimpleOSRBrowser.stat index 18cbca72..bfc375fb 100644 --- a/demos/SimpleOSRBrowser/SimpleOSRBrowser.stat +++ b/demos/SimpleOSRBrowser/SimpleOSRBrowser.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=34852 -DesignerSecs=580 -InspectorSecs=376 -CompileSecs=1544647 -OtherSecs=3785 +EditorSecs=35030 +DesignerSecs=796 +InspectorSecs=610 +CompileSecs=1601450 +OtherSecs=3818 StartTime=22/01/2017 17:35:20 RealKeys=0 EffectiveKeys=0 -DebugSecs=19587 +DebugSecs=19849 diff --git a/demos/SimpleOSRBrowser/uSimpleOSRBrowser.dfm b/demos/SimpleOSRBrowser/uSimpleOSRBrowser.dfm index 963f41d6..01bbc393 100644 --- a/demos/SimpleOSRBrowser/uSimpleOSRBrowser.dfm +++ b/demos/SimpleOSRBrowser/uSimpleOSRBrowser.dfm @@ -36,7 +36,7 @@ object Form1: TForm1 object ComboBox1: TComboBox Left = 5 Top = 5 - Width = 755 + Width = 721 Height = 21 Align = alClient ItemIndex = 0 @@ -47,9 +47,9 @@ object Form1: TForm1 'https://html5demos.com/drag') end object Panel2: TPanel - Left = 760 + Left = 726 Top = 5 - Width = 35 + Width = 69 Height = 20 Margins.Left = 2 Margins.Top = 2 @@ -57,6 +57,7 @@ object Form1: TForm1 Margins.Bottom = 2 Align = alRight BevelOuter = bvNone + Padding.Left = 4 ShowCaption = False TabOrder = 1 object GoBtn: TButton @@ -65,11 +66,31 @@ object Form1: TForm1 Width = 31 Height = 20 Margins.Left = 5 - Align = alRight + Align = alLeft Caption = 'Go' TabOrder = 0 OnClick = GoBtnClick end + object SnapshotBtn: TButton + Left = 38 + Top = 0 + Width = 31 + Height = 20 + Hint = 'Take snapshot' + Margins.Left = 5 + Align = alRight + Caption = #181 + Font.Charset = SYMBOL_CHARSET + Font.Color = clWindowText + Font.Height = -24 + Font.Name = 'Webdings' + Font.Style = [] + ParentFont = False + ParentShowHint = False + ShowHint = True + TabOrder = 1 + OnClick = SnapshotBtnClick + end end end object Panel1: TPanel @@ -117,4 +138,11 @@ object Form1: TForm1 Left = 24 Top = 128 end + object SaveDialog1: TSaveDialog + DefaultExt = 'bmp' + Filter = 'Bitmap files (*.bmp)|*.BMP' + Title = 'Save snapshot' + Left = 544 + Top = 62 + end end diff --git a/demos/SimpleOSRBrowser/uSimpleOSRBrowser.pas b/demos/SimpleOSRBrowser/uSimpleOSRBrowser.pas index b2d1d4c5..dfa2cb9d 100644 --- a/demos/SimpleOSRBrowser/uSimpleOSRBrowser.pas +++ b/demos/SimpleOSRBrowser/uSimpleOSRBrowser.pas @@ -50,10 +50,7 @@ uses Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, AppEvnts, {$ENDIF} GR32_Image, // You need the Graphics32 components for this demo available at http://graphics32.org - uCEFChromium, uCEFTypes, uCEFInterfaces; - -const - MINIBROWSER_CREATED = WM_APP + $100; + uCEFChromium, uCEFTypes, uCEFInterfaces, uCEFConstants; type TForm1 = class(TForm) @@ -65,6 +62,8 @@ type ComboBox1: TComboBox; Panel2: TPanel; GoBtn: TButton; + SnapshotBtn: TButton; + SaveDialog1: TSaveDialog; procedure AppEventsMessage(var Msg: tagMSG; var Handled: Boolean); @@ -95,6 +94,7 @@ type procedure chrmosrPopupShow(Sender: TObject; const browser: ICefBrowser; show: Boolean); procedure chrmosrPopupSize(Sender: TObject; const browser: ICefBrowser; const rect: PCefRect); procedure chrmosrAfterCreated(Sender: TObject; const browser: ICefBrowser); + procedure SnapshotBtnClick(Sender: TObject); private function getModifiers(Shift: TShiftState): TCefEventFlags; @@ -104,7 +104,7 @@ type procedure WMMoving(var aMessage : TMessage); message WM_MOVING; procedure WMCaptureChanged(var aMessage : TMessage); message WM_CAPTURECHANGED; procedure WMCancelMode(var aMessage : TMessage); message WM_CANCELMODE; - procedure BrowserCreatedMsg(var aMessage : TMessage); message MINIBROWSER_CREATED; + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; public { Public declarations } @@ -235,7 +235,7 @@ end; procedure TForm1.chrmosrAfterCreated(Sender: TObject; const browser: ICefBrowser); begin - PostMessage(Handle, MINIBROWSER_CREATED, 0, 0); + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); end; procedure TForm1.chrmosrCursorChange(Sender : TObject; @@ -569,4 +569,9 @@ begin chrmosr.SendFocusEvent(False); end; +procedure TForm1.SnapshotBtnClick(Sender: TObject); +begin + if SaveDialog1.Execute then PaintBox.Buffer.SaveToFile(SaveDialog1.FileName); +end; + end. diff --git a/demos/ToolBoxBrowser/ToolBoxBrowser.dproj.local b/demos/ToolBoxBrowser/ToolBoxBrowser.dproj.local index 7dde1148..8d868d00 100644 --- a/demos/ToolBoxBrowser/ToolBoxBrowser.dproj.local +++ b/demos/ToolBoxBrowser/ToolBoxBrowser.dproj.local @@ -2,11 +2,11 @@ 2017/05/21 15:39:53.000.029,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/05/21 15:40:36.000.672,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uMainForm.pas - 2017/05/21 15:40:36.000.672,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uMainForm.dfm - 2017/05/21 15:40:43.000.627,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\ToolBoxBrowser.dproj + 2017/05/21 15:40:36.000.672,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas + 2017/05/21 15:40:36.000.672,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm + 2017/05/21 15:40:43.000.627,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\ToolBoxBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj 2017/05/21 15:44:20.000.154,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\Unit2.pas - 2017/05/21 15:46:19.000.247,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\Unit2.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.dfm - 2017/05/21 15:46:19.000.247,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\Unit2.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.pas + 2017/05/21 15:46:19.000.247,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\Unit2.pas + 2017/05/21 15:46:19.000.247,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\Unit2.dfm diff --git a/demos/ToolBoxBrowser/ToolBoxBrowser.dsk b/demos/ToolBoxBrowser/ToolBoxBrowser.dsk index 64c453d5..fe17bc0d 100644 --- a/demos/ToolBoxBrowser/ToolBoxBrowser.dsk +++ b/demos/ToolBoxBrowser/ToolBoxBrowser.dsk @@ -11,20 +11,20 @@ File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF [Modules] Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.pas -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\ToolBoxBrowser.dproj -Module2=default.htm +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\ToolBoxBrowser.dproj Count=3 EditWindowCount=1 [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.pas] ModuleType=TSourceModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\ToolBoxBrowser.dproj] -ModuleType=TBaseProject - [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\ToolBoxBrowser.dproj] +ModuleType=TBaseProject + [EditWindow0] ViewCount=3 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.pas @@ -49,15 +49,16 @@ BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 -RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000161500000000000001D00700000000000001000000004312000009000000446F636B53697465320100000000471D000009000000446F636B5369746534FFFFFFFF -BottomPanelSize=1551 +RightPanelClients=DockSite2 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF +BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020100000009000000446F636B53697465313B36000000000000020F0600000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF -TabDockLeftClients=PropertyInspector=0,DockSite3=1 +TabDockLeftClients=DockSite3=0,PropertyInspector=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -79,7 +80,7 @@ CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\ToolBoxBrowser\uChildForm.pas CursorX=31 CursorY=240 -TopLine=238 +TopLine=43 LeftCol=1 Elisions= Bookmarks= @@ -150,11 +151,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=8935 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=8935 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -163,18 +164,18 @@ StayOnTop=0 [MessageView] PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=18 -Width=10000 -Height=1401 +Top=0 +Width=2773 +Height=1424 MaxLeft=-1 MaxTop=-1 -ClientWidth=10000 -ClientHeight=1401 -TBDockHeight=1401 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -187,12 +188,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=2000 -Height=2713 +Width=1875 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=2713 +ClientWidth=1875 +ClientHeight=6794 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -299,25 +300,20 @@ Create=1 Visible=0 Docked=1 State=0 -Left=1 -Top=24 +Left=0 +Top=18 Width=1898 -Height=9137 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=9215 TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 SplitPos=111 -[PropInspDesignerSelection] -ArrangeBy=Name -SelectedItem=Name,Action -ExpandedItems="LiveBindings Designer=0" - [frmDesignPreview] PercentageSizes=1 Create=1 @@ -362,8 +358,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-8 +Top=287 Width=273 Height=359 MaxLeft=-1 @@ -725,12 +721,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=9215 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=9215 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -763,22 +759,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=DockRightPanel +HostDockSite=RightTabDock DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=449 +Top=0 Width=2000 -Height=2713 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=2000 -ClientHeight=2713 -TBDockHeight=7164 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/ToolBoxBrowser/ToolBoxBrowser.stat b/demos/ToolBoxBrowser/ToolBoxBrowser.stat index 193903ed..9f12700e 100644 --- a/demos/ToolBoxBrowser/ToolBoxBrowser.stat +++ b/demos/ToolBoxBrowser/ToolBoxBrowser.stat @@ -3,7 +3,7 @@ EditorSecs=703 DesignerSecs=17 InspectorSecs=1 CompileSecs=40631 -OtherSecs=84 +OtherSecs=85 StartTime=21/05/2017 17:35:40 RealKeys=0 EffectiveKeys=0 diff --git a/source/CEF4Delphi.dproj.local b/source/CEF4Delphi.dproj.local index 3e2c5ec0..fd01a9f0 100644 --- a/source/CEF4Delphi.dproj.local +++ b/source/CEF4Delphi.dproj.local @@ -2,289 +2,289 @@ 2016/11/03 13:34:24.000.622,=rtl.dcp - 2016/11/03 13:36:50.000.899,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Package1.dproj=C:\Program Files\Embarcadero\Studio\17.0\cef3\cef3.dproj + 2016/11/03 13:36:50.000.899,C:\Program Files\Embarcadero\Studio\17.0\cef3\cef3.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Package1.dproj 2016/11/03 13:37:44.000.301,=C:\Program Files\Embarcadero\Studio\17.0\cef3\ceferr.pas 2016/11/03 13:37:45.000.074,=C:\Program Files\Embarcadero\Studio\17.0\cef3\cefgui.pas - 2016/11/03 13:37:45.000.219,=C:\Program Files\Embarcadero\Studio\17.0\cef3\ceflib.pas 2016/11/03 13:37:45.000.236,=C:\Program Files\Embarcadero\Studio\17.0\cef3\cefreg.pas + 2016/11/03 13:37:45.000.219,=C:\Program Files\Embarcadero\Studio\17.0\cef3\ceflib.pas 2016/11/03 13:37:47.000.876,=C:\Program Files\Embarcadero\Studio\17.0\cef3\cefvcl.pas 2016/11/03 13:42:03.000.211,=vcl.dcp 2016/11/03 14:22:14.000.293,C:\Program Files\Embarcadero\Studio\17.0\cef3\ceferr.pas= 2016/11/03 14:22:31.000.065,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/03 14:23:07.000.607,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFConstants.pas + 2016/11/03 14:23:07.000.607,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFConstants.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/03 16:02:18.000.380,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/03 16:02:54.000.678,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLibrary.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/03 19:41:00.000.323,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFTypes.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLibrary.pas + 2016/11/03 16:02:54.000.678,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLibrary.pas + 2016/11/03 19:41:00.000.323,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLibrary.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFTypes.pas 2016/11/03 19:41:47.000.437,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/03 19:42:09.000.623,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFInterfaces.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/03 19:42:09.000.623,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFInterfaces.pas 2016/11/03 19:47:24.000.150,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/03 19:47:36.000.023,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFMiscFunctions.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/03 19:47:36.000.023,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFMiscFunctions.pas 2016/11/04 09:38:54.000.499,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 09:39:27.000.208,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLibFunctions.pas - 2016/11/04 10:17:03.000.353,C:\Program Files\Embarcadero\Studio\17.0\cef3\cefgui.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFHandlers.pas + 2016/11/04 09:39:27.000.208,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLibFunctions.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/04 10:17:03.000.353,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFHandlers.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\cefgui.pas 2016/11/04 10:19:09.000.192,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 10:19:19.000.721,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFApplication.pas + 2016/11/04 10:19:19.000.721,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFApplication.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 10:28:32.000.523,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 10:28:45.000.314,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBase.pas + 2016/11/04 10:28:45.000.314,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBase.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 10:53:47.000.492,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 10:54:04.000.082,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSchemeRegistrar.pas + 2016/11/04 10:54:04.000.082,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSchemeRegistrar.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 10:57:19.000.058,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 10:57:35.000.208,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCommandLine.pas + 2016/11/04 10:57:35.000.208,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCommandLine.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:12:13.000.709,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:12:22.000.981,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFClient.pas + 2016/11/04 11:12:22.000.981,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFClient.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:18:45.000.858,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:19:23.000.685,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFProcessMessage.pas + 2016/11/04 11:19:23.000.685,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFProcessMessage.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:22:59.000.325,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:23:09.000.748,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBrowser.pas + 2016/11/04 11:23:09.000.748,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBrowser.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:30:13.000.870,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:30:22.000.479,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFListValue.pas + 2016/11/04 11:30:22.000.479,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFListValue.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:33:29.000.686,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:33:40.000.124,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBinaryValue.pas + 2016/11/04 11:33:40.000.124,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBinaryValue.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:36:10.000.379,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:36:37.000.046,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFValue.pas + 2016/11/04 11:36:37.000.046,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFValue.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 11:40:42.000.080,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 11:41:02.000.855,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDictionaryValue.pas + 2016/11/04 11:41:02.000.855,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDictionaryValue.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:04:55.000.807,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:05:21.000.299,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImageCallback.pas - 2016/11/04 12:05:37.000.607,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImageCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImage.pas - 2016/11/04 12:10:01.000.351,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImage.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadImage.pas - 2016/11/04 12:10:25.000.976,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadImage.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadImageCallBack.pas + 2016/11/04 12:05:21.000.299,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImageCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/04 12:05:37.000.607,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImage.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImageCallback.pas + 2016/11/04 12:10:01.000.351,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadImage.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastDownloadImage.pas + 2016/11/04 12:10:25.000.976,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadImageCallBack.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadImage.pas 2016/11/04 12:12:39.000.648,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:12:49.000.133,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFrame.pas + 2016/11/04 12:12:49.000.133,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFrame.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:16:41.000.794,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:16:57.000.667,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPDFPrintCallback.pas + 2016/11/04 12:16:57.000.667,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPDFPrintCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:21:00.000.581,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:21:15.000.075,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRunFileDialogCallback.pas + 2016/11/04 12:21:15.000.075,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRunFileDialogCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:25:08.000.825,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:25:24.000.237,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestContext.pas + 2016/11/04 12:25:24.000.237,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestContext.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:31:41.000.426,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:31:57.000.575,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFNavigationEntryVisitor.pas + 2016/11/04 12:31:57.000.575,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFNavigationEntryVisitor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:37:26.000.233,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:37:41.000.439,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStringVisitor.pas + 2016/11/04 12:37:41.000.439,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStringVisitor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:41:15.000.143,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:41:29.000.653,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Context.pas + 2016/11/04 12:41:29.000.653,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Context.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:44:15.000.121,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:44:21.000.835,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDomVisitor.pas + 2016/11/04 12:44:21.000.835,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDomVisitor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:47:43.000.602,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:47:55.000.980,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFNavigationEntry.pas + 2016/11/04 12:47:55.000.980,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFNavigationEntry.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:54:00.000.201,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:54:11.000.315,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieManager.pas + 2016/11/04 12:54:11.000.315,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieManager.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 12:57:30.000.891,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 12:57:42.000.499,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCompletionCallback.pas + 2016/11/04 12:57:42.000.499,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCompletionCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 13:01:09.000.833,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 13:01:23.000.562,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestContextHandler.pas + 2016/11/04 13:01:23.000.562,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestContextHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 13:57:45.000.846,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 13:57:59.000.369,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWebPluginInfo.pas + 2016/11/04 13:57:59.000.369,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWebPluginInfo.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 14:31:30.000.550,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 14:31:41.000.938,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDomDocument.pas + 2016/11/04 14:31:41.000.938,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDomDocument.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 14:34:17.000.090,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 14:34:28.000.129,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDomNode.pas + 2016/11/04 14:34:28.000.129,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDomNode.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 14:37:55.000.209,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 14:38:03.000.057,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Value.pas + 2016/11/04 14:38:03.000.057,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Value.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 14:41:40.000.277,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 14:41:59.000.136,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFV8Accessor.pas - 2016/11/04 14:42:16.000.591,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFV8Accessor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastv8Accessor.pas - 2016/11/04 14:42:25.000.676,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastv8Accessor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Accessor.pas - 2016/11/04 15:22:35.000.321,C:\Program Files\Embarcadero\Studio\17.0\cef3\cefvcl.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium.pas + 2016/11/04 14:41:59.000.136,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFV8Accessor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/04 14:42:16.000.591,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastv8Accessor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFV8Accessor.pas + 2016/11/04 14:42:25.000.676,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Accessor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFastv8Accessor.pas + 2016/11/04 15:22:35.000.321,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\cefvcl.pas 2016/11/04 15:35:00.000.300,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 15:35:10.000.181,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLoadHandler.pas + 2016/11/04 15:35:10.000.181,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLoadHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 15:41:55.000.278,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 15:42:06.000.032,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFocusHandler.pas + 2016/11/04 15:42:06.000.032,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFocusHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 15:45:35.000.950,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 15:45:45.000.999,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFContextMenuHandler.pas + 2016/11/04 15:45:45.000.999,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFContextMenuHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 15:50:29.000.265,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 15:50:38.000.989,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDialogHandler.pas + 2016/11/04 15:50:38.000.989,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDialogHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 15:56:26.000.967,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 15:56:35.000.859,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFKeyboardHandler.pas + 2016/11/04 15:56:35.000.859,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFKeyboardHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 15:59:45.000.629,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 15:59:55.000.903,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDisplayHandler.pas + 2016/11/04 15:59:55.000.903,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDisplayHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:02:33.000.750,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:02:43.000.771,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadHandler.pas + 2016/11/04 16:02:43.000.771,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:05:14.000.727,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:05:25.000.707,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFGeolocationHandler.pas + 2016/11/04 16:05:25.000.707,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFGeolocationHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:07:34.000.747,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:07:48.000.604,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFJsDialogHandler.pas + 2016/11/04 16:07:48.000.604,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFJsDialogHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:10:46.000.310,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:10:57.000.068,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLifeSpanHandler.pas + 2016/11/04 16:10:57.000.068,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFLifeSpanHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:14:08.000.188,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:14:20.000.442,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestHandler.pas + 2016/11/04 16:14:20.000.442,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:18:01.000.623,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:18:07.000.730,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRenderHandler.pas + 2016/11/04 16:18:07.000.730,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRenderHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:21:06.000.326,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:21:15.000.423,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDragHandler.pas - 2016/11/04 16:27:29.000.133,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFHandlers.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFindHandler.pas + 2016/11/04 16:21:15.000.423,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDragHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/04 16:27:29.000.133,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFindHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFHandlers.pas 2016/11/04 16:29:59.000.889,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:30:12.000.364,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPostData.pas + 2016/11/04 16:30:12.000.364,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPostData.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:32:14.000.814,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:32:25.000.911,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPostDataElement.pas + 2016/11/04 16:32:25.000.911,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPostDataElement.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:33:41.000.767,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:33:51.000.107,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequest.pas + 2016/11/04 16:33:51.000.107,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequest.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:35:36.000.010,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:35:50.000.837,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStreamReader.pas + 2016/11/04 16:35:50.000.837,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStreamReader.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:37:53.000.753,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:38:01.000.643,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWriteHandler.pas + 2016/11/04 16:38:01.000.643,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWriteHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:39:57.000.905,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:40:04.000.132,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStreamWriter.pas + 2016/11/04 16:40:04.000.132,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStreamWriter.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:41:56.000.888,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:42:13.000.418,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8StackFrame.pas + 2016/11/04 16:42:13.000.418,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8StackFrame.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:43:23.000.259,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:43:31.000.890,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8StackTrace.pas + 2016/11/04 16:43:31.000.890,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8StackTrace.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:45:02.000.388,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:45:15.000.769,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Handler.pas + 2016/11/04 16:45:15.000.769,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Handler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:47:31.000.384,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:47:43.000.976,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestCallback.pas + 2016/11/04 16:47:43.000.976,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRequestCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:48:49.000.916,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:49:13.000.169,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCustomStreamReader.pas + 2016/11/04 16:49:13.000.169,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCustomStreamReader.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:52:24.000.501,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:54:53.000.505,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCallback.pas + 2016/11/04 16:54:53.000.505,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 16:57:17.000.239,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 16:57:26.000.077,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResourceHandler.pas + 2016/11/04 16:57:26.000.077,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResourceHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:00:50.000.674,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:00:59.000.259,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSchemeHandlerFactory.pas + 2016/11/04 17:00:59.000.259,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSchemeHandlerFactory.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:03:15.000.546,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:05:49.000.016,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFTask.pas + 2016/11/04 17:05:49.000.016,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFTask.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:10:43.000.387,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:10:57.000.795,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFTaskRunner.pas + 2016/11/04 17:10:57.000.795,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFTaskRunner.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:11:52.000.079,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:11:59.000.503,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStringMap.pas + 2016/11/04 17:11:59.000.503,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStringMap.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:13:03.000.928,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:13:12.000.687,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStringMultimap.pas + 2016/11/04 17:13:12.000.687,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFStringMultimap.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:15:01.000.582,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:15:12.000.909,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFXmlReader.pas + 2016/11/04 17:15:12.000.909,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFXmlReader.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:16:26.000.528,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:16:34.000.014,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFZipReader.pas + 2016/11/04 17:16:34.000.014,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFZipReader.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:17:43.000.074,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:17:51.000.944,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResponse.pas + 2016/11/04 17:17:51.000.944,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResponse.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:29:30.000.463,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:29:40.000.733,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieVisitor.pas + 2016/11/04 17:29:40.000.733,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieVisitor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:32:01.000.224,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:32:07.000.583,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFV8Exception.pas + 2016/11/04 17:32:07.000.583,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFV8Exception.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:34:32.000.893,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:34:39.000.833,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResourceBundleHandler.pas + 2016/11/04 17:34:39.000.833,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResourceBundleHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:38:58.000.648,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:39:04.000.466,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSetCookieCallback.pas + 2016/11/04 17:39:04.000.466,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSetCookieCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:40:44.000.949,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:40:57.000.165,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDeleteCookiesCallback.pas + 2016/11/04 17:40:57.000.165,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDeleteCookiesCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:43:27.000.412,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:43:42.000.253,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownLoadItem.pas + 2016/11/04 17:43:42.000.253,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownLoadItem.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:45:13.000.508,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:45:19.000.703,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBeforeDownloadCallback.pas + 2016/11/04 17:45:19.000.703,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBeforeDownloadCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:46:27.000.140,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:46:38.000.480,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadItemCallback.pas + 2016/11/04 17:46:38.000.480,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDownloadItemCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:49:03.000.980,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:49:13.000.577,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFAuthCallback.pas + 2016/11/04 17:49:13.000.577,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFAuthCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:50:22.000.655,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:50:32.000.879,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFJsDialogCallback.pas + 2016/11/04 17:50:32.000.879,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFJsDialogCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:51:12.000.076,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:51:18.000.891,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFGeolocationCallback.pas + 2016/11/04 17:51:18.000.891,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFGeolocationCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:52:26.000.379,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:52:38.000.008,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFContextMenuParams.pas + 2016/11/04 17:52:38.000.008,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFContextMenuParams.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:53:51.000.704,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:53:59.000.469,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFMenuModel.pas + 2016/11/04 17:53:59.000.469,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFMenuModel.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:55:42.000.326,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:55:54.000.047,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBrowserProcessHandler.pas + 2016/11/04 17:55:54.000.047,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFBrowserProcessHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 17:57:33.000.807,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 17:57:44.000.320,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRenderProcessHandler.pas + 2016/11/04 17:57:44.000.320,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRenderProcessHandler.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:01:03.000.908,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:01:16.000.502,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFUrlrequestClient.pas + 2016/11/04 18:01:16.000.502,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFUrlrequestClient.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:03:22.000.002,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:03:36.000.694,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFUrlRequest.pas + 2016/11/04 18:03:36.000.694,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFUrlRequest.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:04:54.000.070,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:05:01.000.724,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWebPluginInfoVisitor.pas + 2016/11/04 18:05:01.000.724,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWebPluginInfoVisitor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:08:01.000.312,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:08:10.000.190,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWebPluginUnstableCallback.pas + 2016/11/04 18:08:10.000.190,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWebPluginUnstableCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:09:22.000.047,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:09:32.000.833,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFEndTracingCallback.pas + 2016/11/04 18:09:32.000.833,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFEndTracingCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:10:56.000.167,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:11:03.000.863,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFGetGeolocationCallback.pas + 2016/11/04 18:11:03.000.863,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFGetGeolocationCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:11:49.000.619,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:11:58.000.315,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFileDialogCallback.pas + 2016/11/04 18:11:58.000.315,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFFileDialogCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:13:17.000.596,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:13:28.000.975,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDragData.pas + 2016/11/04 18:13:28.000.975,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFDragData.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:14:46.000.315,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:14:55.000.027,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResolveCallback.pas + 2016/11/04 18:14:55.000.027,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResolveCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:17:10.000.544,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:17:23.000.918,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPrintSettings.pas + 2016/11/04 18:17:23.000.918,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPrintSettings.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:18:17.000.655,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:18:25.000.031,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSslCertPrincipal.pas + 2016/11/04 18:18:25.000.031,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSslCertPrincipal.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:19:36.000.246,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:19:49.000.081,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSslInfo.pas + 2016/11/04 18:19:49.000.081,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSslInfo.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:21:23.000.319,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:21:29.000.499,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRunContextMenuCallback.pas + 2016/11/04 18:21:29.000.499,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRunContextMenuCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:22:54.000.779,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:23:07.000.660,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResourceBundle.pas + 2016/11/04 18:23:07.000.660,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResourceBundle.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:24:23.000.928,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:24:31.000.808,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResponseFilter.pas + 2016/11/04 18:24:31.000.808,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFResponseFilter.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:25:31.000.691,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:25:41.000.021,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFImage.pas + 2016/11/04 18:25:41.000.021,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFImage.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:26:54.000.263,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/04 18:27:04.000.226,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFMenuModelDelegate.pas + 2016/11/04 18:27:04.000.226,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFMenuModelDelegate.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/04 18:28:19.000.494,C:\Program Files\Embarcadero\Studio\17.0\cef3\ceflib.pas= - 2016/11/04 18:31:57.000.277,C:\Program Files\Embarcadero\Studio\17.0\cef3\uRegister.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\cefreg.pas + 2016/11/04 18:31:57.000.277,C:\Program Files\Embarcadero\Studio\17.0\cef3\cefreg.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uRegister.pas 2016/11/05 09:18:32.000.021,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/05 09:18:43.000.557,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Types.pas - 2016/11/05 09:41:11.000.609,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRegisterComponents.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uRegister.pas + 2016/11/05 09:18:43.000.557,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Types.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/05 09:41:11.000.609,C:\Program Files\Embarcadero\Studio\17.0\cef3\uRegister.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFRegisterComponents.pas 2016/11/06 17:42:31.000.412,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/06 17:42:57.000.570,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieDeleterTask.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/06 17:42:57.000.570,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieDeleterTask.pas 2016/11/06 17:57:18.000.164,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFCookieDeleterTask.pas= 2016/11/13 17:16:54.000.597,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/13 17:17:19.000.616,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/13 17:17:19.000.616,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas 2016/11/13 18:46:07.000.526,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/13 18:52:50.000.372,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumDevTools.pas + 2016/11/13 18:52:50.000.372,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumDevTools.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/11/14 14:57:55.000.572,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas= 2016/11/25 09:35:30.000.156,=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas 2016/11/25 09:39:41.000.590,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas= 2016/11/29 09:52:14.000.850,=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas 2016/11/29 10:05:42.000.033,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/29 10:06:49.000.745,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumEvents.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/29 10:06:49.000.745,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumEvents.pas 2016/11/29 10:08:16.000.524,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/29 10:10:28.000.078,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOptions.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/29 10:10:28.000.078,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOptions.pas 2016/11/29 10:11:26.000.030,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/29 10:12:11.000.187,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumFontOptions.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/29 10:12:11.000.187,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumFontOptions.pas 2016/11/29 10:14:39.000.549,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/29 10:15:46.000.466,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPDFPrintOptions.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/29 11:35:06.000.964,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumBase.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas + 2016/11/29 10:15:46.000.466,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFPDFPrintOptions.pas + 2016/11/29 11:35:06.000.964,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumOSR.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumBase.pas 2016/11/29 11:35:58.000.919,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium.pas= - 2016/11/29 11:36:22.000.935,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumBase.pas - 2016/11/29 11:41:17.000.365,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWindowParent.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumDevTools.pas + 2016/11/29 11:36:22.000.935,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumBase.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium.pas + 2016/11/29 11:41:17.000.365,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumDevTools.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWindowParent.pas 2016/11/29 14:26:03.000.580,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/11/29 14:38:08.000.147,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\TCEFChromiumWindow.pas - 2016/11/29 14:41:18.000.620,C:\Program Files\Embarcadero\Studio\17.0\cef3\TCEFChromiumWindow.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumWindow.pas + 2016/11/29 14:38:08.000.147,C:\Program Files\Embarcadero\Studio\17.0\cef3\TCEFChromiumWindow.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/11/29 14:41:18.000.620,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumWindow.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\TCEFChromiumWindow.pas 2016/11/29 15:48:26.000.475,=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium2.pas 2016/11/29 16:29:04.000.712,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromium2.pas= 2016/12/14 09:31:37.000.825,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/14 09:43:37.000.496,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCefRegisterCDMCallback.pas + 2016/12/14 09:43:37.000.496,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCefRegisterCDMCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/12/15 11:52:46.000.153,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/12/15 15:23:08.000.388,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/15 15:27:53.000.729,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFThread.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/12/15 15:27:53.000.729,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFThread.pas 2016/12/15 16:33:21.000.646,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/15 16:33:59.000.530,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Interceptor.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/12/15 16:33:59.000.530,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFv8Interceptor.pas 2016/12/15 18:08:50.000.736,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/15 18:10:25.000.832,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWaitableEvent.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/12/15 18:10:25.000.832,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFWaitableEvent.pas 2016/12/16 09:51:23.000.585,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/16 09:53:31.000.858,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFX509CertPrincipal.pas + 2016/12/16 09:53:31.000.858,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFX509CertPrincipal.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/12/16 10:34:36.000.246,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/16 10:39:48.000.349,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFX509Certificate.pas + 2016/12/16 10:39:48.000.349,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFX509Certificate.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas 2016/12/16 11:11:31.000.335,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSslCertPrincipal.pas= 2016/12/16 12:46:25.000.699,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/16 12:51:53.000.173,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSSLStatus.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/12/16 12:51:53.000.173,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSSLStatus.pas 2016/12/16 13:03:29.000.911,=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas - 2016/12/16 13:15:23.000.921,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSelectClientCertificateCallback.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas + 2016/12/16 13:15:23.000.921,C:\Program Files\Embarcadero\Studio\17.0\cef3\Unit1.pas=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFSelectClientCertificateCallback.pas 2017/01/05 09:46:44.000.222,C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumWindow.pas= 2017/01/05 10:34:46.000.529,=C:\Program Files\Embarcadero\Studio\17.0\cef3\uCEFChromiumWindow.pas - 2017/01/22 10:37:38.000.090,C:\Program Files\Embarcadero\Studio\17.0\cef3\CEF4Delphi.dproj=C:\Program Files\Embarcadero\Studio\17.0\cef3\cef3.dproj + 2017/01/22 10:37:38.000.090,C:\Program Files\Embarcadero\Studio\17.0\cef3\cef3.dproj=C:\Program Files\Embarcadero\Studio\17.0\cef3\CEF4Delphi.dproj 2017/03/16 09:32:10.000.622,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBaseRefCounted.pas 2017/03/16 09:32:22.000.431,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBaseScopedWrapper.pas 2017/03/16 09:32:54.000.567,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBase.pas= 2017/03/26 17:18:35.000.135,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas - 2017/03/26 17:19:20.000.644,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFDLLFunctions.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas + 2017/03/26 17:19:20.000.644,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFDLLFunctions.pas 2017/03/26 17:28:33.000.757,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFDLLFunctions.pas= 2017/05/21 15:27:39.000.810,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas - 2017/05/21 15:34:16.000.487,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumTool.dfm - 2017/05/21 15:34:16.000.487,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumTool.pas + 2017/05/21 15:34:16.000.487,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumTool.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.dfm + 2017/05/21 15:34:16.000.487,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumTool.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas 2017/05/21 15:36:08.000.019,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumTool.pas= 2017/06/05 17:09:35.000.867,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas - 2017/06/05 17:10:51.000.565,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFAccessibilityHandler.pas - 2017/07/18 09:50:01.000.551,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFDragAndDrop.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uOLEDragAndDrop.pas + 2017/06/05 17:10:51.000.565,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFAccessibilityHandler.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\Unit1.pas + 2017/07/18 09:50:01.000.551,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uOLEDragAndDrop.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFDragAndDrop.pas diff --git a/source/CEF4Delphi.dsk b/source/CEF4Delphi.dsk index 7e8d7027..46d548ee 100644 --- a/source/CEF4Delphi.dsk +++ b/source/CEF4Delphi.dsk @@ -1,27 +1,37 @@ [Closed Files] -File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,22,39,60,0,0,, -File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFListValue.pas',0,1,34,19,53,0,0,, -File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBinaryValue.pas',0,1,20,78,58,0,0,, -File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,1755,24,1765,0,0,, -File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFValue.pas',0,1,34,3,53,0,0,, -File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,1137,76,1167,0,0,, -File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBrowser.pas',0,1,52,89,80,0,0,, -File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSEval\uJSEval.pas',0,1,238,103,281,0,0,, -File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFX509Certificate.pas',0,1,111,36,149,0,0,, -File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumEvents.pas',0,1,80,112,109,0,0,, +File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFRegisterCDMCallback.pas',0,1,70,87,28,0,0,, +File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFLoadHandler.pas',0,1,79,1,1,0,0,, +File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,41,39,60,0,0,,{1 +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,52,79,72,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,580,19,582,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumEvents.pas',0,1,62,37,91,0,0,, +File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas',0,1,341,19,362,0,0,, +File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,215,3,244,0,0,, +File_8=TSourceModule,'c:\program files (x86)\embarcadero\studio\19.0\SOURCE\VCL\Vcl.Dialogs.pas',0,1,5974,3,5997,0,0,, +File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFListValue.pas',0,1,34,19,53,0,0,, [Modules] -Module0=default.htm -Count=1 +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas +Module2=default.htm +Count=3 EditWindowCount=1 +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas] +ModuleType=TSourceModule + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas] +ModuleType=TSourceModule + [default.htm] ModuleType=TURLModule [EditWindow0] -ViewCount=1 -CurrentView=0 +ViewCount=3 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas View0=0 +View1=1 +View2=2 PercentageSizes=1 Create=1 Visible=1 @@ -39,20 +49,44 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=0 -RightPanelSize=0 -BottomPanelSize=1508 +RightPanelSize=2000 +RightPanelClients=DockSite2 +RightPanelData=00000800010000000000972300000000000000D90A00000000000001000000009723000009000000446F636B5369746532FFFFFFFF +BottomPanelSize=1551 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020100000009000000446F636B53697465313B3600000000000002E40500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomPanelData=0000080001020100000009000000446F636B53697465313B36000000000000020F0600000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0,DockSite2=1 +TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView WelcomePageURL=bds:/default.htm +[View1] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas +CursorX=65 +CursorY=1093 +TopLine=1071 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas + +[View2] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas +CursorX=3 +CursorY=95 +TopLine=82 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas + [UndockedDesigner] Count=0 @@ -70,11 +104,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -118,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=7231 +Height=7265 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=7231 +ClientHeight=7265 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -137,12 +171,12 @@ State=0 Left=0 Top=18 Width=10000 -Height=1357 +Height=1401 MaxLeft=-1 MaxTop=-1 ClientWidth=10000 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1401 +TBDockHeight=1401 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -155,12 +189,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6738 +Width=2000 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6738 +ClientWidth=2000 +ClientHeight=9137 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -210,8 +244,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=-30 +Left=-121 +Top=-70 Width=1844 Height=3139 MaxLeft=-1 @@ -267,14 +301,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=78 -Top=386 +Left=0 +Top=357 Width=1898 -Height=7164 +Height=5415 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=7164 +ClientHeight=5415 TBDockHeight=7164 LRDockWidth=1898 Dockable=1 @@ -289,12 +323,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -306,8 +340,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1210 -Top=-7 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -325,8 +359,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=287 +Left=-1152 +Top=247 Width=273 Height=359 MaxLeft=-1 @@ -350,11 +384,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -369,11 +403,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -392,11 +426,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -411,11 +445,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -513,12 +547,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -552,11 +586,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1076 +Height=1143 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1076 +ClientHeight=1143 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -577,12 +611,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6738 +Width=1898 +Height=9215 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 +ClientWidth=1898 +ClientHeight=9215 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -596,12 +630,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6457 +Width=2000 +Height=6883 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6457 +ClientWidth=2000 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -664,12 +698,12 @@ State=0 Left=0 Top=18 Width=3820 -Height=1357 +Height=1424 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1357 -TBDockHeight=1357 +ClientHeight=1424 +TBDockHeight=1424 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -678,21 +712,21 @@ ActiveTabID=DebugLogView TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=4 -Top=24 +Left=0 +Top=18 Width=2000 -Height=7511 +Height=7545 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=7511 +ClientHeight=7545 TBDockHeight=7164 LRDockWidth=2000 Dockable=1 @@ -710,13 +744,13 @@ Visible=0 Docked=1 State=0 Left=0 -Top=0 +Top=18 Width=1898 -Height=7164 +Height=9215 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6738 +ClientWidth=1898 +ClientHeight=9215 TBDockHeight=7164 LRDockWidth=1898 Dockable=1 @@ -733,14 +767,14 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=4 +Top=24 Width=2000 -Height=7164 +Height=9137 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6738 +ClientWidth=2000 +ClientHeight=9137 TBDockHeight=7164 LRDockWidth=2000 Dockable=1 diff --git a/source/CEF4Delphi.stat b/source/CEF4Delphi.stat index ecf9ef44..faca2155 100644 --- a/source/CEF4Delphi.stat +++ b/source/CEF4Delphi.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=156216 +EditorSecs=160834 DesignerSecs=98 InspectorSecs=326 -CompileSecs=5065676 -OtherSecs=16679 +CompileSecs=5222209 +OtherSecs=17016 StartTime=22/01/2017 10:49:52 RealKeys=0 EffectiveKeys=0 diff --git a/source/uCEFApplication.pas b/source/uCEFApplication.pas index ea56d1e1..e80479d3 100644 --- a/source/uCEFApplication.pas +++ b/source/uCEFApplication.pas @@ -57,7 +57,7 @@ uses const CEF_SUPPORTED_VERSION_MAJOR = 3; CEF_SUPPORTED_VERSION_MINOR = 3112; - CEF_SUPPORTED_VERSION_RELEASE = 1658; + CEF_SUPPORTED_VERSION_RELEASE = 1659; CEF_SUPPORTED_VERSION_BUILD = 0; CEF_CHROMEELF_VERSION_MAJOR = 60; @@ -545,27 +545,82 @@ begin end; function TCefApplication.CheckCEFLibrary : boolean; +var + TempString, TempPath : string; begin Result := False; if not(FCheckCEFFiles) then Result := True else - if CheckDLLs(FFrameworkDirPath) and - CheckResources(FResourcesDirPath) and - CheckLocales(FLocalesDirPath) then - begin - if CheckDLLVersion(LibCefPath, - CEF_SUPPORTED_VERSION_MAJOR, - CEF_SUPPORTED_VERSION_MINOR, - CEF_SUPPORTED_VERSION_RELEASE, - CEF_SUPPORTED_VERSION_BUILD) then - Result := True - else - MessageDlg('Unsupported CEF version !', mtError, [mbOk], 0); - end - else - MessageDlg('CEF binaries missing !', mtError, [mbOk], 0); + begin + if not(CheckDLLs(FFrameworkDirPath)) then + begin + TempString := 'CEF framework files missing !' + CRLF + CRLF; + + if GetAbsoluteDirPath(FFrameworkDirPath, TempPath) then + begin + if (length(TempPath) = 0) then TempPath := ExtractFilePath(ParamStr(0)); + TempString := TempString + 'Make sure all the CEF framework files can be found in this directory :' + CRLF + SplitLongString(TempPath); + end + else + TempString := TempString + 'The CEF framework directory doesn' + #39 +'t exist!' + CRLF + SplitLongString(FFrameworkDirPath); + + MessageDlg(TempString, mtError, [mbOk], 0); + exit; + end; + + + if not(CheckResources(FResourcesDirPath)) then + begin + TempString := 'CEF resources missing !' + CRLF + CRLF; + + if GetAbsoluteDirPath(FResourcesDirPath, TempPath) then + begin + if (length(TempPath) = 0) then TempPath := ExtractFilePath(ParamStr(0)); + TempString := TempString + 'Make sure all the CEF resources can be found in this directory :' + CRLF + SplitLongString(TempPath); + end + else + TempString := TempString + 'The CEF resources directory doesn' + #39 +'t exist!' + CRLF + SplitLongString(FResourcesDirPath); + + MessageDlg(TempString, mtError, [mbOk], 0); + exit; + end; + + + if not(CheckLocales(FLocalesDirPath)) then + begin + TempString := 'CEF locale files missing !' + CRLF + CRLF; + + if GetAbsoluteDirPath(FLocalesDirPath, TempPath) then + begin + if (length(TempPath) = 0) then TempPath := ExtractFilePath(ParamStr(0)) + 'locales'; + TempString := TempString + 'Make sure all the CEF locale files can be found in this directory :' + CRLF + SplitLongString(TempPath); + end + else + TempString := TempString + 'The CEF locales directory doesn' + #39 +'t exist!' + CRLF + SplitLongString(FLocalesDirPath); + + MessageDlg(TempString, mtError, [mbOk], 0); + exit; + end; + + + if CheckDLLVersion(LibCefPath, + CEF_SUPPORTED_VERSION_MAJOR, + CEF_SUPPORTED_VERSION_MINOR, + CEF_SUPPORTED_VERSION_RELEASE, + CEF_SUPPORTED_VERSION_BUILD) then + Result := True + else + begin + TempString := 'Unsupported CEF version !' + + CRLF + CRLF + + 'Use only the CEF3 binaries specified in the CEF4Delphi Readme.md file at ' + + CRLF + CEF4DELPHI_URL; + + MessageDlg(TempString, mtError, [mbOk], 0); + end; + end; end; function TCefApplication.StartMainProcess : boolean; diff --git a/source/uCEFChromium.pas b/source/uCEFChromium.pas index e1384743..bda5423f 100644 --- a/source/uCEFChromium.pas +++ b/source/uCEFChromium.pas @@ -1090,7 +1090,7 @@ begin if Initialized then begin GetPrintPDFSettings(TempSettings, aTitle, aURL); - if (FPDFPrintcb = nil) then FPDFPrintcb := TCefPDFPrintCallBack.Create(self); + if (FPDFPrintcb = nil) then FPDFPrintcb := TCefCustomPDFPrintCallBack.Create(self); FBrowser.Host.PrintToPdf(aFilePath, @TempSettings, FPDFPrintcb); end; end; diff --git a/source/uCEFChromiumWindow.pas b/source/uCEFChromiumWindow.pas index 447bb01b..78152267 100644 --- a/source/uCEFChromiumWindow.pas +++ b/source/uCEFChromiumWindow.pas @@ -57,14 +57,17 @@ uses type TChromiumWindow = class(TCEFWindowParent) protected - FChromium : TChromium; - FOnClose : TNotifyEvent; + FChromium : TChromium; + FOnClose : TNotifyEvent; + FOnAfterCreated : TNotifyEvent; function GetChildWindowHandle : THandle; override; procedure OnCloseMsg(var aMessage : TMessage); message CEF_DOONCLOSE; + procedure OnAfterCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; procedure WebBrowser_OnClose(Sender: TObject; const browser: ICefBrowser; out Result: Boolean); + procedure WebBrowser_OnAfterCreated(Sender: TObject; const browser: ICefBrowser); public constructor Create(AOwner: TComponent); override; @@ -76,7 +79,8 @@ type property ChromiumBrowser : TChromium read FChromium; published - property OnClose : TNotifyEvent read FOnClose write FOnClose; + property OnClose : TNotifyEvent read FOnClose write FOnClose; + property OnAfterCreated : TNotifyEvent read FOnAfterCreated write FOnAfterCreated; end; implementation @@ -92,8 +96,9 @@ constructor TChromiumWindow.Create(AOwner: TComponent); begin inherited Create(AOwner); - FChromium := nil; - FOnClose := nil; + FChromium := nil; + FOnClose := nil; + FOnAfterCreated := nil; end; procedure TChromiumWindow.AfterConstruction; @@ -102,8 +107,9 @@ begin if not(csDesigning in ComponentState) then begin - FChromium := TChromium.Create(self); - FChromium.OnClose := WebBrowser_OnClose; + FChromium := TChromium.Create(self); + FChromium.OnClose := WebBrowser_OnClose; + FChromium.OnAfterCreated := WebBrowser_OnAfterCreated; end; end; @@ -119,18 +125,28 @@ procedure TChromiumWindow.WebBrowser_OnClose(Sender: TObject; const browser: ICe begin if assigned(FOnClose) then begin - PostMessage(self.Handle, CEF_DOONCLOSE, 0, 0); + PostMessage(Handle, CEF_DOONCLOSE, 0, 0); Result := True; end else Result := False; end; +procedure TChromiumWindow.WebBrowser_OnAfterCreated(Sender: TObject; const browser: ICefBrowser); +begin + PostMessage(Handle, CEF_AFTERCREATED, 0, 0); +end; + procedure TChromiumWindow.OnCloseMsg(var aMessage : TMessage); begin if assigned(FOnClose) then FOnClose(self); end; +procedure TChromiumWindow.OnAfterCreatedMsg(var aMessage : TMessage); +begin + if assigned(FOnAfterCreated) then FOnAfterCreated(self); +end; + procedure TChromiumWindow.CreateBrowser; begin if not(csDesigning in ComponentState) and (FChromium <> nil) then diff --git a/source/uCEFConstants.pas b/source/uCEFConstants.pas index c02b2f14..76fbea0a 100644 --- a/source/uCEFConstants.pas +++ b/source/uCEFConstants.pas @@ -359,10 +359,14 @@ const CEF_PREFERENCES_SAVED = WM_APP + $A00; CEF_DOONCLOSE = WM_APP + $A01; CEF_STARTDRAGGING = WM_APP + $A02; + CEF_AFTERCREATED = WM_APP + $A03; CEF_USER_TIMER_MINIMUM = $0000000A; CEF_USER_TIMER_MAXIMUM = $7FFFFFFF; + CEF4DELPHI_URL = 'https://github.com/salvadordf/CEF4Delphi'; + CRLF = #13 + #10; + implementation end. diff --git a/source/uCEFMiscFunctions.pas b/source/uCEFMiscFunctions.pas index e5dff8f4..0af1d20a 100644 --- a/source/uCEFMiscFunctions.pas +++ b/source/uCEFMiscFunctions.pas @@ -133,6 +133,8 @@ procedure UInt64ToFileVersionInfo(const aVersion : uint64; var aVersionInfo : TF function GetExtendedFileVersion(const aFileName : string) : uint64; function GetDLLVersion(const aDLLFile : string; var aVersionInfo : TFileVersionInfo) : boolean; +function SplitLongString(aSrcString : string) : string; +function GetAbsoluteDirPath(const aSrcPath : string; var aRsltPath : string) : boolean; function CheckLocales(const aLocalesDirPath : string) : boolean; function CheckResources(const aResourcesDirPath : string) : boolean; function CheckDLLs(const aFrameworkDirPath : string) : boolean; @@ -575,6 +577,21 @@ begin Result := cef_clear_cross_origin_whitelist <> 0; end; +function SplitLongString(aSrcString : string) : string; +const + MAXLINELENGTH = 50; +begin + while (length(aSrcString) > 0) do + begin + if (length(Result) > 0) then + Result := Result + CRLF + copy(aSrcString, 1, MAXLINELENGTH) + else + Result := Result + copy(aSrcString, 1, MAXLINELENGTH); + + aSrcString := copy(aSrcString, succ(MAXLINELENGTH), length(aSrcString)); + end; +end; + function CheckLocales(const aLocalesDirPath : string) : boolean; var TempDir : string; @@ -651,6 +668,24 @@ begin end; end; +function GetAbsoluteDirPath(const aSrcPath : string; var aRsltPath : string) : boolean; +begin + Result := True; + + if (length(aSrcPath) > 0) then + begin + if DirectoryExists(aSrcPath) then + begin + aRsltPath := IncludeTrailingPathDelimiter(aSrcPath); + if CustomPathIsRelative(aRsltPath) then aRsltPath := ExtractFilePath(ParamStr(0)) + aRsltPath; + end + else + Result := False; + end + else + aRsltPath := ''; +end; + function CheckResources(const aResourcesDirPath : string) : boolean; var TempDir : string; @@ -658,20 +693,8 @@ begin Result := False; try - if (length(aResourcesDirPath) > 0) then - begin - if DirectoryExists(aResourcesDirPath) then - begin - TempDir := IncludeTrailingPathDelimiter(aResourcesDirPath); - if CustomPathIsRelative(TempDir) then TempDir := ExtractFilePath(ParamStr(0)) + TempDir; - end - else - exit; - end - else - TempDir := ''; - - Result := FileExists(TempDir + 'natives_blob.bin') and + Result := GetAbsoluteDirPath(aResourcesDirPath, TempDir) and + FileExists(TempDir + 'natives_blob.bin') and FileExists(TempDir + 'snapshot_blob.bin') and FileExists(TempDir + 'icudtl.dat') and FileExists(TempDir + 'cef.pak') and @@ -692,20 +715,8 @@ begin Result := False; try - if (length(aFrameworkDirPath) > 0) then - begin - if DirectoryExists(aFrameworkDirPath) then - begin - TempDir := IncludeTrailingPathDelimiter(aFrameworkDirPath); - if CustomPathIsRelative(TempDir) then TempDir := ExtractFilePath(ParamStr(0)) + TempDir; - end - else - exit; - end - else - TempDir := ''; - - Result := FileExists(TempDir + CHROMEELF_DLL) and + Result := GetAbsoluteDirPath(aFrameworkDirPath, TempDir) and + FileExists(TempDir + CHROMEELF_DLL) and FileExists(TempDir + LIBCEF_DLL) and FileExists(TempDir + 'd3dcompiler_43.dll') and FileExists(TempDir + 'd3dcompiler_47.dll') and diff --git a/source/uCEFPDFPrintCallback.pas b/source/uCEFPDFPrintCallback.pas index dcf64afc..449aea86 100644 --- a/source/uCEFPDFPrintCallback.pas +++ b/source/uCEFPDFPrintCallback.pas @@ -68,7 +68,7 @@ type constructor Create(const proc: TOnPdfPrintFinishedProc); reintroduce; end; - TCefPDFPrintCallBack = class(TCefPdfPrintCallbackOwn) + TCefCustomPDFPrintCallBack = class(TCefPdfPrintCallbackOwn) protected FChromiumBrowser : TObject; @@ -92,7 +92,7 @@ constructor TCefPdfPrintCallbackOwn.Create; begin CreateData(SizeOf(TCefPdfPrintCallback), False); - with PCefPdfPrintCallback(FData)^ do on_pdf_print_finished := cef_pdf_print_callback_on_pdf_print_finished; + PCefPdfPrintCallback(FData).on_pdf_print_finished := cef_pdf_print_callback_on_pdf_print_finished; end; // TCefFastPdfPrintCallback @@ -108,16 +108,16 @@ begin FProc(path, ok); end; -// TCefPDFPrintCallBack +// TCefCustomPDFPrintCallBack -constructor TCefPDFPrintCallBack.Create(const aChromiumBrowser : TObject); +constructor TCefCustomPDFPrintCallBack.Create(const aChromiumBrowser : TObject); begin inherited Create; FChromiumBrowser := aChromiumBrowser; end; -procedure TCefPDFPrintCallBack.OnPdfPrintFinished(const path: ustring; aResultOK : Boolean); +procedure TCefCustomPDFPrintCallBack.OnPdfPrintFinished(const path: ustring; aResultOK : Boolean); begin if (FChromiumBrowser <> nil) and (FChromiumBrowser is TChromium) then TChromium(FChromiumBrowser).Internal_PdfPrintFinished(aResultOK);