diff --git a/demos/JSExtension/JSExtension.dproj.local b/demos/JSExtension/JSExtension.dproj.local index 860377b3..c1fdd06e 100644 --- a/demos/JSExtension/JSExtension.dproj.local +++ b/demos/JSExtension/JSExtension.dproj.local @@ -3,9 +3,9 @@ 2017/07/15 09:50:55.000.277,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas 2017/07/25 21:43:25.000.930,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/07/25 21:43:40.000.982,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas - 2017/07/25 21:43:40.000.982,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm - 2017/07/25 21:43:48.000.560,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/07/25 21:43:40.000.982,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\Unit1.pas + 2017/07/25 21:43:40.000.982,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\Unit1.dfm + 2017/07/25 21:43:48.000.560,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dproj 2017/07/25 21:44:09.000.830,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\Unit1.pas= 2017/07/25 21:44:16.000.573,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uJSExtension.pas 2017/07/25 21:48:00.000.759,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas diff --git a/demos/JSExtension/JSExtension.dsk b/demos/JSExtension/JSExtension.dsk index 83661b79..c36ec66a 100644 --- a/demos/JSExtension/JSExtension.dsk +++ b/demos/JSExtension/JSExtension.dsk @@ -11,24 +11,24 @@ 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=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=default.htm +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uTestExtension.pas +Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\uJSExtension.pas 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 -[default.htm] -ModuleType=TURLModule - [EditWindow0] ViewCount=4 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dpr @@ -52,18 +52,18 @@ ClientHeight=9417 DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 -LeftPanelSize=0 +LeftPanelSize=1898 +LeftPanelClients=PropertyInspector,DockSite3 +LeftPanelData=00000800010100000000A219000000000000016A0700000000000001000000005D0E000009000000446F636B53697465330100000000972300001100000050726F7065727479496E73706563746F72FFFFFFFF RightPanelSize=2000 -RightPanelClients=DockSite2 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF +RightPanelClients=DockSite2,DockSite4 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF -TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -74,7 +74,7 @@ CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\JSExtension\JSExtension.dpr CursorX=2 CursorY=89 -TopLine=51 +TopLine=63 LeftCol=1 Elisions= Bookmarks= @@ -167,11 +167,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8935 +Height=4305 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8935 +ClientHeight=4305 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -204,12 +204,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6794 +Width=2000 +Height=4383 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6794 +ClientWidth=2000 +ClientHeight=4383 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -259,8 +259,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=-30 +Left=-121 +Top=-70 Width=1844 Height=3139 MaxLeft=-1 @@ -313,18 +313,18 @@ StayOnTop=0 [PropertyInspector] PercentageSizes=1 Create=1 -Visible=0 +Visible=1 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 -TBDockHeight=7220 +ClientHeight=5415 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -374,8 +374,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=287 +Left=-1152 +Top=247 Width=273 Height=359 MaxLeft=-1 @@ -626,12 +626,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6794 +Width=1898 +Height=3554 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=3554 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -737,12 +737,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=9215 +Height=4585 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9215 -TBDockHeight=7220 +ClientHeight=4585 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -751,22 +751,22 @@ ActiveTabID=ProjectManager TabDockClients=ProjectManager,ModelViewTool,DataExplorerContainer,frmDesignPreview,TFileExplorerForm [DockSite3] -HostDockSite=LeftDockTabSet +HostDockSite=DockLeftPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 -Top=0 +Top=18 Width=1898 -Height=7220 +Height=3554 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 -TBDockHeight=7220 +ClientWidth=1898 +ClientHeight=3554 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -775,22 +775,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 -Top=0 +Top=449 Width=2000 -Height=7220 +Height=4383 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6794 -TBDockHeight=7220 +ClientWidth=2000 +ClientHeight=4383 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/JSExtension/JSExtension.stat b/demos/JSExtension/JSExtension.stat index c08fd0a1..7aca297d 100644 --- a/demos/JSExtension/JSExtension.stat +++ b/demos/JSExtension/JSExtension.stat @@ -3,7 +3,7 @@ EditorSecs=4637 DesignerSecs=28 InspectorSecs=43 CompileSecs=192587 -OtherSecs=474 +OtherSecs=475 StartTime=25/07/2017 22:09:15 RealKeys=0 EffectiveKeys=0 diff --git a/demos/MiniBrowser/MiniBrowser.dsk b/demos/MiniBrowser/MiniBrowser.dsk index 246aafb9..5cb579fa 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,578,45,611,0,0,, -File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\FastMM4\FastMM4.pas',0,1,9585,88,9618,0,0,, -File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,194,16,223,0,0,, -File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,1065,56,1098,0,0,, -File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,1712,23,1740,0,0,, -File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas',0,1,79,1,88,0,0,, -File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,70,37,58,0,0,, -File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFWindowParent.pas',0,1,65,27,66,0,0,, -File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,246,22,279,0,0,, -File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPostData.pas',0,1,97,1,134,0,0,, +File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,2170,74,2204,0,0,, +File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFStringVisitor.pas',0,1,128,1,131,0,0,, +File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas',0,1,193,1,204,0,0,, +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,183,54,225,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\FastMM4\FastMM4.pas',0,1,9585,88,9618,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,1712,23,1740,0,0,, +File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFPDFPrintCallback.pas',0,1,79,1,88,0,0,, +File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumWindow.pas',0,1,70,37,58,0,0,, +File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFWindowParent.pas',0,1,65,27,66,0,0,, +File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,246,22,279,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 @@ -43,18 +48,17 @@ ClientHeight=9417 DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 -LeftPanelSize=1898 -LeftPanelClients=PropertyInspector,DockSite3 -LeftPanelData=00000800010100000000A219000000000000016A0700000000000001000000005D0E000009000000446F636B53697465330100000000972300001100000050726F7065727479496E73706563746F72FFFFFFFF +LeftPanelSize=0 RightPanelSize=2000 RightPanelClients=DockSite2,DockSite4 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF -BottomPanelSize=0 +RightPanelData=0000080001010100000009000000446F636B5369746534161500000000000001D0070000000000000100000000471D000009000000446F636B5369746532FFFFFFFF +BottomPanelSize=1551 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF +BottomPanelData=000008000102000000003B36000000000000020F0600000000000001000000001D1B000009000000446F636B536974653101000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF +TabDockLeftClients=PropertyInspector=0,DockSite3=1 [View0] CustomEditViewType=TWelcomePageView @@ -63,14 +67,25 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\MiniBrowser.dpr -CursorX=1 -CursorY=1 -TopLine=1 +CursorX=2 +CursorY=66 +TopLine=52 LeftCol=1 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=25 +CursorY=560 +TopLine=543 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas + [UndockedDesigner] Count=0 @@ -88,11 +103,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1121 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -136,11 +151,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4305 +Height=7265 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4305 +ClientHeight=7265 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -149,18 +164,18 @@ StayOnTop=0 [MessageView] PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 -Left=0 -Top=0 -Width=2773 -Height=1424 +Left=640 +Top=18 +Width=5000 +Height=1401 MaxLeft=-1 MaxTop=-1 -ClientWidth=2773 -ClientHeight=1424 -TBDockHeight=1424 +ClientWidth=5000 +ClientHeight=1401 +TBDockHeight=1401 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -174,11 +189,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4383 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4383 +ClientHeight=7220 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -228,8 +243,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-121 -Top=-70 +Left=-8 +Top=-30 Width=1844 Height=3139 MaxLeft=-1 @@ -282,18 +297,18 @@ StayOnTop=0 [PropertyInspector] PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 -Left=0 -Top=357 +Left=78 +Top=386 Width=1898 -Height=5415 +Height=7220 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=5415 -TBDockHeight=7164 +ClientHeight=7220 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -343,8 +358,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1152 -Top=247 +Left=-1024 +Top=265 Width=273 Height=359 MaxLeft=-1 @@ -368,11 +383,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1121 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -387,11 +402,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1121 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -410,11 +425,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1121 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -429,11 +444,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1121 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1121 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -569,12 +584,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=3820 -Height=1143 +Width=4969 +Height=1121 MaxLeft=-1 MaxTop=-1 -ClientWidth=3820 -ClientHeight=1143 +ClientWidth=4969 +ClientHeight=1121 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -595,12 +610,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1898 -Height=3554 +Width=1773 +Height=6794 MaxLeft=-1 MaxTop=-1 -ClientWidth=1898 -ClientHeight=3554 +ClientWidth=1773 +ClientHeight=6794 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -676,23 +691,23 @@ HostDockSite=DockBottomPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 Top=18 -Width=3820 -Height=1424 +Width=4969 +Height=1401 MaxLeft=-1 MaxTop=-1 -ClientWidth=3820 -ClientHeight=1424 -TBDockHeight=1424 +ClientWidth=4969 +ClientHeight=1401 +TBDockHeight=1401 LRDockWidth=3820 Dockable=1 StayOnTop=0 TabPosition=1 -ActiveTabID=DebugLogView +ActiveTabID=BreakpointWindow TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow [DockSite2] @@ -706,12 +721,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=4585 +Height=7545 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4585 -TBDockHeight=7164 +ClientHeight=7545 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -720,22 +735,22 @@ ActiveTabID=ProjectManager TabDockClients=ProjectManager,ModelViewTool,DataExplorerContainer,frmDesignPreview,TFileExplorerForm [DockSite3] -HostDockSite=DockLeftPanel +HostDockSite=LeftDockTabSet DockSiteType=1 PercentageSizes=1 Create=1 -Visible=1 +Visible=0 Docked=1 State=0 Left=0 -Top=18 +Top=0 Width=1898 -Height=3554 +Height=7220 MaxLeft=-1 MaxTop=-1 -ClientWidth=1898 -ClientHeight=3554 -TBDockHeight=7164 +ClientWidth=1773 +ClientHeight=6794 +TBDockHeight=7220 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -748,18 +763,18 @@ HostDockSite=DockRightPanel 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 +ClientHeight=7220 +TBDockHeight=7220 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/MiniBrowser/MiniBrowser.identcache b/demos/MiniBrowser/MiniBrowser.identcache index 86b38cba..2e37c38f 100644 Binary files a/demos/MiniBrowser/MiniBrowser.identcache and b/demos/MiniBrowser/MiniBrowser.identcache differ diff --git a/demos/MiniBrowser/MiniBrowser.stat b/demos/MiniBrowser/MiniBrowser.stat index 704b1796..3635e0db 100644 --- a/demos/MiniBrowser/MiniBrowser.stat +++ b/demos/MiniBrowser/MiniBrowser.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=47373 +EditorSecs=47870 DesignerSecs=2448 InspectorSecs=1794 -CompileSecs=2570804 -OtherSecs=7442 +CompileSecs=2680883 +OtherSecs=7675 StartTime=11/02/2017 10:51:15 RealKeys=0 EffectiveKeys=0 -DebugSecs=38622 +DebugSecs=40274 diff --git a/demos/MiniBrowser/uMiniBrowser.dfm b/demos/MiniBrowser/uMiniBrowser.dfm index 3a03502d..ffe0c388 100644 --- a/demos/MiniBrowser/uMiniBrowser.dfm +++ b/demos/MiniBrowser/uMiniBrowser.dfm @@ -103,7 +103,7 @@ object MiniBrowserFrm: TMiniBrowserFrm Font.Style = [] ParentFont = False TabOrder = 3 - OnClick = ReloadBtnClick + OnClick = StopBtnClick end end object URLEditPnl: TPanel diff --git a/demos/MiniBrowser/uMiniBrowser.pas b/demos/MiniBrowser/uMiniBrowser.pas index 880c6dfe..368b2a24 100644 --- a/demos/MiniBrowser/uMiniBrowser.pas +++ b/demos/MiniBrowser/uMiniBrowser.pas @@ -154,6 +154,7 @@ type const browser: ICefBrowser; const frame: ICefFrame; const request: ICefRequest; const response: ICefResponse; out Result: Boolean); + procedure StopBtnClick(Sender: TObject); protected FResponse : string; @@ -429,6 +430,11 @@ begin StatusBar1.Panels[0].Text := aText; end; +procedure TMiniBrowserFrm.StopBtnClick(Sender: TObject); +begin + Chromium1.StopLoad; +end; + procedure TMiniBrowserFrm.Chromium1StatusMessage(Sender: TObject; const browser: ICefBrowser; const value: ustring); begin @@ -490,6 +496,7 @@ end; procedure TMiniBrowserFrm.Openfile1Click(Sender: TObject); begin + // This is a quick solution to load files. The file URL should be properly encoded. if OpenDialog1.Execute then Chromium1.LoadURL('file:///' + OpenDialog1.FileName); end; diff --git a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dproj.local b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dproj.local index 128194ac..187cb5db 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\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: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: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 e5abd7af..e91b3b60 100644 --- a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dsk +++ b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.dsk @@ -9,32 +9,32 @@ 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\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 +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dproj +Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas +Module2=default.htm +Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas 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 +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas] +ModuleType=TSourceModule + [default.htm] ModuleType=TURLModule +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFConstants.pas] +ModuleType=TSourceModule + [C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uHelloScheme.pas] ModuleType=TSourceModule [EditWindow0] ViewCount=5 -CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\uSchemeRegistrationBrowser.pas +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dpr View0=0 View1=1 View2=2 @@ -56,18 +56,18 @@ ClientHeight=9417 DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 -LeftPanelSize=0 +LeftPanelSize=1898 +LeftPanelClients=PropertyInspector,DockSite3 +LeftPanelData=00000800010100000000A219000000000000016A0700000000000001000000005D0E000009000000446F636B53697465330100000000972300001100000050726F7065727479496E73706563746F72FFFFFFFF RightPanelSize=2000 -RightPanelClients=DockSite2 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF +RightPanelClients=DockSite2,DockSite4 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF -TabDockLeftClients=PropertyInspector=0,DockSite3=1 -TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -78,7 +78,7 @@ CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SchemeRegistrationBrowser\SchemeRegistrationBrowser.dpr CursorX=77 CursorY=78 -TopLine=40 +TopLine=28 LeftCol=1 Elisions= Bookmarks= @@ -87,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=63 -CursorY=97 -TopLine=43 +CursorX=44 +CursorY=88 +TopLine=88 LeftCol=1 Elisions= Bookmarks= @@ -182,11 +182,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8935 +Height=4305 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8935 +ClientHeight=4305 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -219,12 +219,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6794 +Width=2000 +Height=4383 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6794 +ClientWidth=2000 +ClientHeight=4383 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -274,8 +274,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=-30 +Left=-121 +Top=-70 Width=1844 Height=3139 MaxLeft=-1 @@ -328,18 +328,18 @@ StayOnTop=0 [PropertyInspector] PercentageSizes=1 Create=1 -Visible=0 +Visible=1 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 -TBDockHeight=7220 +ClientHeight=5415 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -389,8 +389,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-8 -Top=287 +Left=-1152 +Top=247 Width=273 Height=359 MaxLeft=-1 @@ -642,11 +642,11 @@ State=0 Left=0 Top=0 Width=1898 -Height=9137 +Height=3554 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 +ClientHeight=3554 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -752,12 +752,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=9215 +Height=4585 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9215 -TBDockHeight=7220 +ClientHeight=4585 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -766,22 +766,22 @@ ActiveTabID=ProjectManager TabDockClients=ProjectManager,ModelViewTool,DataExplorerContainer,frmDesignPreview,TFileExplorerForm [DockSite3] -HostDockSite=LeftDockTabSet +HostDockSite=DockLeftPanel DockSiteType=1 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=3554 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9137 -TBDockHeight=7220 +ClientHeight=3554 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -790,22 +790,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 -Top=0 +Top=449 Width=2000 -Height=7220 +Height=4383 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6794 -TBDockHeight=7220 +ClientWidth=2000 +ClientHeight=4383 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat index 780db412..e2edb65d 100644 --- a/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat +++ b/demos/SchemeRegistrationBrowser/SchemeRegistrationBrowser.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=191 +EditorSecs=206 DesignerSecs=6 InspectorSecs=1 CompileSecs=9494 -OtherSecs=27 +OtherSecs=28 StartTime=12/08/2017 16:06:01 RealKeys=0 EffectiveKeys=0 diff --git a/demos/SimpleBrowser/SimpleBrowser.dproj.local b/demos/SimpleBrowser/SimpleBrowser.dproj.local index 0d6eeadf..3aa584d9 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\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 + 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 diff --git a/demos/SimpleBrowser/SimpleBrowser.dsk b/demos/SimpleBrowser/SimpleBrowser.dsk index 3999e5d3..8f7735f8 100644 --- a/demos/SimpleBrowser/SimpleBrowser.dsk +++ b/demos/SimpleBrowser/SimpleBrowser.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\SimpleBrowser\SimpleBrowser.dproj -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas -Module2=default.htm +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas 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\uSimpleBrowser.pas] +ModuleType=TSourceModule + [EditWindow0] ViewCount=3 CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr @@ -49,19 +49,17 @@ DockedToMainForm=1 BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 TopPanelSize=0 LeftPanelSize=1898 -LeftPanelClients=PropertyInspector -LeftPanelData=00000800010000000000D61B0000000000000000000000000000000100000000D61B00001100000050726F7065727479496E73706563746F72FFFFFFFF +LeftPanelClients=PropertyInspector,DockSite3 +LeftPanelData=00000800010100000000A219000000000000016A0700000000000001000000005D0E000009000000446F636B53697465330100000000972300001100000050726F7065727479496E73706563746F72FFFFFFFF RightPanelSize=2000 -RightPanelClients=DockSite2 -RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746532FFFFFFFF +RightPanelClients=DockSite2,DockSite4 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000004312000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF BottomPanelSize=0 BottomPanelClients=DockSite1,MessageView BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF -TabDockLeftClients=DockSite3=0 -TabDockRightClients=DockSite4=0 [View0] CustomEditViewType=TWelcomePageView @@ -70,8 +68,8 @@ WelcomePageURL=bds:/default.htm [View1] CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\SimpleBrowser.dpr -CursorX=2 -CursorY=67 +CursorX=56 +CursorY=63 TopLine=37 LeftCol=1 Elisions= @@ -83,7 +81,7 @@ CustomEditViewType=TEditView Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\SimpleBrowser\uSimpleBrowser.pas CursorX=15 CursorY=85 -TopLine=50 +TopLine=53 LeftCol=1 Elisions= Bookmarks= @@ -154,11 +152,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8935 +Height=4305 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8935 +ClientHeight=4305 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -191,12 +189,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1875 -Height=6794 +Width=2000 +Height=4383 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6794 +ClientWidth=2000 +ClientHeight=4383 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -246,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 @@ -304,24 +302,19 @@ Visible=1 Docked=1 State=0 Left=0 -Top=18 +Top=357 Width=1898 -Height=9215 +Height=5415 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9215 -TBDockHeight=7220 +ClientHeight=5415 +TBDockHeight=7164 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 @@ -366,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 @@ -618,12 +611,12 @@ Docked=1 State=0 Left=0 Top=0 -Width=1773 -Height=6794 +Width=1898 +Height=3554 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 +ClientWidth=1898 +ClientHeight=3554 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -729,12 +722,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=9215 +Height=4585 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9215 -TBDockHeight=7220 +ClientHeight=4585 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -743,22 +736,22 @@ ActiveTabID=ProjectManager TabDockClients=ProjectManager,ModelViewTool,DataExplorerContainer,frmDesignPreview,TFileExplorerForm [DockSite3] -HostDockSite=LeftDockTabSet +HostDockSite=DockLeftPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 -Top=0 +Top=18 Width=1898 -Height=7220 +Height=3554 MaxLeft=-1 MaxTop=-1 -ClientWidth=1773 -ClientHeight=6794 -TBDockHeight=7220 +ClientWidth=1898 +ClientHeight=3554 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -767,22 +760,22 @@ ActiveTabID=StructureView TabDockClients=StructureView,ClassBrowserTool [DockSite4] -HostDockSite=RightTabDock +HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 -Top=0 +Top=449 Width=2000 -Height=7220 +Height=4383 MaxLeft=-1 MaxTop=-1 -ClientWidth=1875 -ClientHeight=6794 -TBDockHeight=7220 +ClientWidth=2000 +ClientHeight=4383 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/demos/SimpleBrowser/SimpleBrowser.stat b/demos/SimpleBrowser/SimpleBrowser.stat index 9a583ed5..ee58edc3 100644 --- a/demos/SimpleBrowser/SimpleBrowser.stat +++ b/demos/SimpleBrowser/SimpleBrowser.stat @@ -1,10 +1,10 @@ [Stats] -EditorSecs=4856 +EditorSecs=4906 DesignerSecs=331 InspectorSecs=170 -CompileSecs=375226 -OtherSecs=1112 +CompileSecs=398339 +OtherSecs=1132 StartTime=22/01/2017 14:51:01 RealKeys=0 EffectiveKeys=0 -DebugSecs=2434 +DebugSecs=2501 diff --git a/demos/TabbedBrowser/00-DeleteDCUs.bat b/demos/TabbedBrowser/00-DeleteDCUs.bat new file mode 100644 index 00000000..76dedadd --- /dev/null +++ b/demos/TabbedBrowser/00-DeleteDCUs.bat @@ -0,0 +1,8 @@ +del /s /q *.dcu +del /s /q *.dcp +del /s /q *.bpl +del /s /q *.bpi +del /s /q *.hpp +del /s /q *.exe +del /s /q *.log +del /s /q *.~* diff --git a/demos/TabbedBrowser/TabBrowser.dpr b/demos/TabbedBrowser/TabBrowser.dpr new file mode 100644 index 00000000..c7f45b00 --- /dev/null +++ b/demos/TabbedBrowser/TabBrowser.dpr @@ -0,0 +1,82 @@ +// ************************************************************************ +// ***************************** CEF4Delphi ******************************* +// ************************************************************************ +// +// CEF4Delphi is based on DCEF3 which uses CEF3 to embed a chromium-based +// browser in Delphi applications. +// +// The original license of DCEF3 still applies to CEF4Delphi. +// +// For more information about CEF4Delphi visit : +// https://www.briskbard.com/index.php?lang=en&pageid=cef +// +// Copyright © 2017 Salvador Díaz Fau. All rights reserved. +// +// ************************************************************************ +// ************ vvvv Original license and comments below vvvv ************* +// ************************************************************************ +(* + * Delphi Chromium Embedded 3 + * + * Usage allowed under the restrictions of the Lesser GNU General Public License + * or alternatively the restrictions of the Mozilla Public License 1.1 + * + * Software distributed under the License is distributed on an "AS IS" basis, + * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for + * the specific language governing rights and limitations under the License. + * + * Unit owner : Henri Gourvest + * Web site : http://www.progdigy.com + * Repository : http://code.google.com/p/delphichromiumembedded/ + * Group : http://groups.google.com/group/delphichromiumembedded + * + * Embarcadero Technologies, Inc is not permitted to use or redistribute + * this source code without explicit permission. + * + *) + +program TabBrowser; + +{$I cef.inc} + +uses + {$IFDEF DELPHI16_UP} + Vcl.Forms, WinApi.Windows, + {$ELSE} + Forms, Windows, + {$ENDIF } + uCEFApplication, + uMainForm in 'uMainForm.pas' {MainForm}; + +{$R *.res} + +// CEF3 needs to set the LARGEADDRESSAWARE flag which allows 32-bit processes to use up to 3GB of RAM. +{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE} + +begin + GlobalCEFApp := TCefApplication.Create; + GlobalCEFApp.FlashEnabled := False; + GlobalCEFApp.FastUnload := True; // Enable the fast unload controller, which speeds up tab/window close by running a tab's onunload js handler independently of the GUI + + // In case you want to use custom directories for the CEF3 binaries, cache, cookies and user data. +{ + GlobalCEFApp.FrameworkDirPath := 'cef'; + GlobalCEFApp.ResourcesDirPath := 'cef'; + GlobalCEFApp.LocalesDirPath := 'cef\locales'; + GlobalCEFApp.cache := 'cef\cache'; + GlobalCEFApp.cookies := 'cef\cookies'; + GlobalCEFApp.UserDataPath := 'cef\User Data'; +} + + if GlobalCEFApp.StartMainProcess then + begin + Application.Initialize; + {$IFDEF DELPHI11_UP} + Application.MainFormOnTaskbar := True; + {$ENDIF} + Application.CreateForm(TMainForm, MainForm); + Application.Run; + end; + + GlobalCEFApp.Free; +end. diff --git a/demos/TabbedBrowser/TabBrowser.dproj b/demos/TabbedBrowser/TabBrowser.dproj new file mode 100644 index 00000000..8c367aca --- /dev/null +++ b/demos/TabbedBrowser/TabBrowser.dproj @@ -0,0 +1,568 @@ + + + {02149B84-943A-4289-B167-DC2C9FC36ABC} + 18.2 + VCL + TabBrowser.dpr + True + Debug + Win32 + 1 + Application + + + true + + + true + Base + true + + + true + Base + true + + + true + Base + true + + + true + Cfg_1 + true + true + + + true + Base + true + + + true + Cfg_2 + true + true + + + .\$(Platform)\$(Config) + false + false + false + false + false + RESTComponents;emsclientfiredac;FireDACIBDriver;emsclient;FireDACCommon;RESTBackendComponents;soapserver;CloudService;FireDACCommonDriver;inet;FireDAC;FireDACSqliteDriver;soaprtl;soapmidas;$(DCC_UsePackage) + System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) + $(BDS)\bin\delphi_PROJECTICON.ico + $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png + $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png + 3082 + TabBrowser + CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments= + + + DBXSqliteDriver;DataSnapServerMidas;DBXDb2Driver;DBXInterBaseDriver;vclactnband;vclFireDAC;DataSnapFireDAC;svnui;tethering;Componentes;FireDACADSDriver;DBXMSSQLDriver;DatasnapConnectorsFreePascal;FireDACMSSQLDriver;vcltouch;vcldb;bindcompfmx;svn;DBXOracleDriver;inetdb;Componentes_Int;CEF4Delphi;IndyProtocols240;fmx;fmxdae;FireDACDBXDriver;dbexpress;vclx;dsnap;DataSnapCommon;DataSnapConnectors;VCLRESTComponents;vclie;bindengine;DBXMySQLDriver;FireDACOracleDriver;FireDACMySQLDriver;DBXFirebirdDriver;FireDACCommonODBC;DataSnapClient;bindcompdbx;vcl;DBXSybaseASEDriver;FireDACDb2Driver;GR32_DSGN_RSXE5;dsnapcon;FireDACMSAccDriver;fmxFireDAC;FireDACInfxDriver;vclimg;Componentes_UI;FireDACPgDriver;FireDACASADriver;DBXOdbcDriver;FireDACTDataDriver;DbxCommonDriver;Componentes_Misc;IndySystem240;DataSnapServer;xmlrtl;DataSnapNativeClient;fmxobj;vclwinx;FireDACDSDriver;rtl;DbxClientDriver;IndyCore240;DBXSybaseASADriver;CustomIPTransport;vcldsnap;GR32_RSXE5;bindcomp;appanalytics;Componentes_RTF;DBXInformixDriver;bindcompvcl;Componentes_vCard;dbxcds;VclSmp;adortl;FireDACODBCDriver;DataSnapIndy10ServerTransport;dsnapxml;DataSnapProviderClient;dbrtl;inetdbxpress;FireDACMongoDBDriver;fmxase;$(DCC_UsePackage) + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) + Debug + true + CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments= + 1033 + $(BDS)\bin\default_app.manifest + + + DBXSqliteDriver;DataSnapServerMidas;DBXDb2Driver;DBXInterBaseDriver;vclactnband;vclFireDAC;DataSnapFireDAC;tethering;FireDACADSDriver;DBXMSSQLDriver;DatasnapConnectorsFreePascal;FireDACMSSQLDriver;vcltouch;vcldb;bindcompfmx;DBXOracleDriver;inetdb;IndyProtocols240;fmx;fmxdae;FireDACDBXDriver;dbexpress;vclx;dsnap;DataSnapCommon;DataSnapConnectors;VCLRESTComponents;vclie;bindengine;DBXMySQLDriver;FireDACOracleDriver;FireDACMySQLDriver;DBXFirebirdDriver;FireDACCommonODBC;DataSnapClient;bindcompdbx;vcl;DBXSybaseASEDriver;FireDACDb2Driver;dsnapcon;FireDACMSAccDriver;fmxFireDAC;FireDACInfxDriver;vclimg;FireDACPgDriver;FireDACASADriver;DBXOdbcDriver;FireDACTDataDriver;DbxCommonDriver;IndySystem240;DataSnapServer;xmlrtl;DataSnapNativeClient;fmxobj;vclwinx;FireDACDSDriver;rtl;DbxClientDriver;IndyCore240;DBXSybaseASADriver;CustomIPTransport;vcldsnap;bindcomp;appanalytics;DBXInformixDriver;bindcompvcl;dbxcds;VclSmp;adortl;FireDACODBCDriver;DataSnapIndy10ServerTransport;dsnapxml;DataSnapProviderClient;dbrtl;inetdbxpress;FireDACMongoDBDriver;fmxase;$(DCC_UsePackage) + + + DEBUG;$(DCC_Define) + true + false + true + true + true + + + false + true + true + true + 1033 + + + false + RELEASE;$(DCC_Define) + 0 + 0 + + + true + true + + + + MainSource + + +
MainForm
+ dfm + + + Cfg_2 + Base + + + Base + + + Cfg_1 + Base + + + + Delphi.Personality.12 + Application + + + + TabBrowser.dpr + + + IP Abstraction Indy Implementation Design Time + Microsoft Office 2000 Sample Automation Server Wrapper Components + Microsoft Office XP Sample Automation Server Wrapper Components + + + + + + TabBrowser.exe + true + + + + + 1 + + + Contents\MacOS + 1 + + + Contents\MacOS + 0 + + + + + classes + 1 + + + + + library\lib\armeabi-v7a + 1 + + + + + library\lib\armeabi + 1 + + + + + library\lib\mips + 1 + + + + + library\lib\armeabi-v7a + 1 + + + + + res\drawable + 1 + + + + + res\values + 1 + + + + + res\drawable + 1 + + + + + res\drawable-xxhdpi + 1 + + + + + res\drawable-ldpi + 1 + + + + + res\drawable-mdpi + 1 + + + + + res\drawable-hdpi + 1 + + + + + res\drawable-xhdpi + 1 + + + + + res\drawable-small + 1 + + + + + res\drawable-normal + 1 + + + + + res\drawable-large + 1 + + + + + res\drawable-xlarge + 1 + + + + + 1 + + + Contents\MacOS + 1 + + + 0 + + + + + Contents\MacOS + 1 + .framework + + + 0 + + + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + Contents\MacOS + 1 + .dylib + + + 0 + .dll;.bpl + + + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + Contents\MacOS + 1 + .dylib + + + 0 + .bpl + + + + + 0 + + + 0 + + + 0 + + + 0 + + + Contents\Resources\StartUp\ + 0 + + + 0 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + + + 1 + + + 1 + + + + + ..\ + 1 + + + ..\ + 1 + + + + + 1 + + + 1 + + + 1 + + + + + 1 + + + 1 + + + 1 + + + + + ..\ + 1 + + + + + Contents + 1 + + + + + Contents\Resources + 1 + + + + + library\lib\armeabi-v7a + 1 + + + 1 + + + 1 + + + 1 + + + 1 + + + Contents\MacOS + 1 + + + 0 + + + + + 1 + + + 1 + + + + + Assets + 1 + + + Assets + 1 + + + + + Assets + 1 + + + Assets + 1 + + + + + + + + + + + + + True + False + + + 12 + + + + + diff --git a/demos/TabbedBrowser/TabBrowser.dproj.local b/demos/TabbedBrowser/TabBrowser.dproj.local new file mode 100644 index 00000000..2a082626 --- /dev/null +++ b/demos/TabbedBrowser/TabBrowser.dproj.local @@ -0,0 +1,10 @@ + + + + 2017/09/22 21:27:36.000.032,=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas + 2017/09/22 21:28:13.000.073,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.dfm=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.dfm + 2017/09/22 21:28:13.000.073,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Unit1.pas + 2017/09/22 21:28:23.000.089,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabbedBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Project1.dproj + 2017/09/22 21:40:45.000.419,C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabbedBrowser.dproj=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabBrowser.dproj + + diff --git a/demos/TabbedBrowser/TabBrowser.dsk b/demos/TabbedBrowser/TabBrowser.dsk new file mode 100644 index 00000000..bbbf0b48 --- /dev/null +++ b/demos/TabbedBrowser/TabBrowser.dsk @@ -0,0 +1,784 @@ +[Closed Files] +File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uChildForm.pas',0,1,67,1,95,0,0,,{1 +File_1=TSourceModule,'c:\program files (x86)\embarcadero\studio\19.0\source\rtl\common\System.Classes.pas',0,1,4648,1,4671,0,0,, +File_2=TSourceModule,'c:\program files (x86)\embarcadero\studio\19.0\SOURCE\VCL\Vcl.ComCtrls.pas',0,1,6640,1,6662,0,0,{{17142,0} +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MiniBrowser\uMiniBrowser.pas',0,1,204,13,206,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,389,27,411,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\MDIBrowser\uMainForm.pas',0,1,49,49,57,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\Componentes_UI\uTabRow.pas',0,1,945,67,973,0,0,, +File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uBrowserTabBody.pas',0,1,2306,1,2328,0,0,, +File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uWebPanel.pas',0,1,3140,82,3177,0,0,, + +[Modules] +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabBrowser.dproj +Module1=default.htm +Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas +Count=3 +EditWindowCount=1 + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabBrowser.dproj] +ModuleType=TBaseProject + +[default.htm] +ModuleType=TURLModule + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas] +ModuleType=TSourceModule + +[EditWindow0] +ViewCount=3 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabBrowser.dpr +View0=0 +View1=1 +View2=2 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=10000 +Height=9417 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=10000 +ClientHeight=9417 +DockedToMainForm=1 +BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 +TopPanelSize=0 +LeftPanelSize=0 +RightPanelSize=2000 +RightPanelClients=DockSite2,DockSite4 +RightPanelData=00000800010100000000261500000000000001D00700000000000001000000004312000009000000446F636B536974653201000000005C1D000009000000446F636B5369746534FFFFFFFF +BottomPanelSize=1529 +BottomPanelClients=DockSite1,MessageView +BottomPanelData=0000080001020100000009000000446F636B53697465313B3600000000000002F90500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF +BottomMiddlePanelSize=0 +BottomMiddlePanelClients=DockSite0,GraphDrawingModel +BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF +TabDockLeftClients=PropertyInspector=0,DockSite3=1 + +[View0] +CustomEditViewType=TWelcomePageView +WelcomePageURL=bds:/default.htm + +[View1] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas +CursorX=80 +CursorY=141 +TopLine=365 +LeftCol=1 +Elisions= +Bookmarks={1,166,37}{2,127,24} +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas + +[View2] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabBrowser.dpr +CursorX=2 +CursorY=62 +TopLine=41 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\TabBrowser.dpr + +[UndockedDesigner] +Count=0 + +[Watches] +Count=0 + +[WatchWindow] +WatchColumnWidth=120 +WatchShowColumnHeaders=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1099 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1099 +TBDockHeight=213 +LRDockWidth=13602 +Dockable=1 +StayOnTop=0 + +[Breakpoints] +Count=0 + +[EmbarcaderoWin32Debugger_AddressBreakpoints] +Count=0 + +[EmbarcaderoWin64Debugger_AddressBreakpoints] +Count=0 + +[Main Window] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=0 +State=2 +Left=148 +Top=269 +Width=8930 +Height=8520 +MaxLeft=-8 +MaxTop=-11 +MaxWidth=8930 +MaxHeight=8520 +ClientWidth=10000 +ClientHeight=9753 +BottomPanelSize=9111 +BottomPanelClients=EditWindow0 +BottomPanelData=0000080000000000000000000000000000000000000000000000000100000000000000000C0000004564697457696E646F775F30FFFFFFFF + +[ProjectManager] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2000 +Height=4305 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=4305 +TBDockHeight=5897 +LRDockWidth=2352 +Dockable=1 +StayOnTop=0 + +[MessageView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=18 +Width=10000 +Height=1379 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=10000 +ClientHeight=1379 +TBDockHeight=1379 +LRDockWidth=2773 +Dockable=1 +StayOnTop=0 + +[ToolForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2000 +Height=2735 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=2735 +TBDockHeight=7152 +LRDockWidth=2000 +Dockable=1 +StayOnTop=0 + +[ClipboardHistory] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=1906 +Height=4989 +MaxLeft=-8 +MaxTop=-11 +ClientWidth=1781 +ClientHeight=4563 +TBDockHeight=4989 +LRDockWidth=1906 +Dockable=1 +StayOnTop=0 + +[ProjectStatistics] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=2062 +Height=5740 +MaxLeft=-8 +MaxTop=-11 +ClientWidth=1938 +ClientHeight=5314 +TBDockHeight=5740 +LRDockWidth=2062 +Dockable=1 +StayOnTop=0 + +[ClassBrowserTool] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-8 +Top=-30 +Width=1844 +Height=3139 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1844 +ClientHeight=3139 +TBDockHeight=3139 +LRDockWidth=1844 +Dockable=1 +StayOnTop=0 + +[MetricsView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=4832 +LRDockWidth=3562 +Dockable=1 +StayOnTop=0 + +[QAView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=4832 +LRDockWidth=3562 +Dockable=1 +StayOnTop=0 + +[PropertyInspector] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=78 +Top=386 +Width=1898 +Height=7164 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1898 +ClientHeight=7164 +TBDockHeight=7164 +LRDockWidth=1898 +Dockable=1 +StayOnTop=0 +SplitPos=111 + +[frmDesignPreview] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2000 +Height=6883 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=6883 +TBDockHeight=5964 +LRDockWidth=2508 +Dockable=1 +StayOnTop=0 + +[TFileExplorerForm] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-946 +Top=5 +Width=2844 +Height=6200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2844 +ClientHeight=6200 +TBDockHeight=6200 +LRDockWidth=2844 +Dockable=1 +StayOnTop=0 + +[TemplateView] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-1152 +Top=247 +Width=273 +Height=359 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=273 +ClientHeight=359 +TBDockHeight=359 +LRDockWidth=273 +Dockable=1 +StayOnTop=0 +Name=120 +Description=334 +filter=1 + +[DebugLogView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1099 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1099 +TBDockHeight=415 +LRDockWidth=4953 +Dockable=1 +StayOnTop=0 + +[ThreadStatusWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1099 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1099 +TBDockHeight=213 +LRDockWidth=7406 +Dockable=1 +StayOnTop=0 +Column0Width=145 +Column1Width=100 +Column2Width=115 +Column3Width=250 + +[LocalVarsWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1099 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1099 +TBDockHeight=1536 +LRDockWidth=3484 +Dockable=1 +StayOnTop=0 + +[CallStackWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1099 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1099 +TBDockHeight=2063 +LRDockWidth=3484 +Dockable=1 +StayOnTop=0 + +[PatchForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=2500 +LRDockWidth=3398 +Dockable=1 +StayOnTop=0 + +[FindReferencsForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=964 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=964 +TBDockHeight=2321 +LRDockWidth=2820 +Dockable=1 +StayOnTop=0 + +[RefactoringForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=3206 +LRDockWidth=2820 +Dockable=1 +StayOnTop=0 + +[ToDo List] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=1155 +LRDockWidth=3680 +Dockable=1 +StayOnTop=0 +Column0Width=314 +Column1Width=30 +Column2Width=150 +Column3Width=172 +Column4Width=129 +SortOrder=4 +ShowHints=1 +ShowChecked=1 + +[DataExplorerContainer] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2000 +Height=6883 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=6883 +TBDockHeight=4888 +LRDockWidth=7148 +Dockable=1 +StayOnTop=0 + +[GraphDrawingModel] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=249 +Top=709 +Width=2859 +Height=3206 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2859 +ClientHeight=3206 +TBDockHeight=3206 +LRDockWidth=2859 +Dockable=1 +StayOnTop=0 + +[BreakpointWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1099 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1099 +TBDockHeight=1547 +LRDockWidth=8742 +Dockable=1 +StayOnTop=0 +Column0Width=200 +Column1Width=75 +Column2Width=200 +Column3Width=200 +Column4Width=200 +Column5Width=75 +Column6Width=75 + +[StructureView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1773 +Height=6738 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1773 +ClientHeight=6738 +TBDockHeight=3677 +LRDockWidth=1898 +Dockable=1 +StayOnTop=0 + +[ModelViewTool] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2000 +Height=6883 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=6883 +TBDockHeight=4888 +LRDockWidth=5305 +Dockable=1 +StayOnTop=0 + +[BorlandEditorCodeExplorer@EditWindow0] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=1828 +Height=6177 +MaxLeft=-8 +MaxTop=-11 +ClientWidth=1703 +ClientHeight=5751 +TBDockHeight=6177 +LRDockWidth=1828 +Dockable=1 +StayOnTop=0 + +[DockHosts] +DockHostCount=5 + +[DockSite0] +HostDockSite=DockBottomCenterPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1480 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1480 +TBDockHeight=1480 +LRDockWidth=2336 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=RefactoringForm +TabDockClients=RefactoringForm,PatchForm,FindReferencsForm,ToDo List,MetricsView,QAView + +[DockSite1] +HostDockSite=DockBottomPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=18 +Width=3820 +Height=1379 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1379 +TBDockHeight=1379 +LRDockWidth=3820 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=DebugLogView +TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow + +[DockSite2] +HostDockSite=DockRightPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=18 +Width=2000 +Height=4585 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=4585 +TBDockHeight=7164 +LRDockWidth=2000 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=ProjectManager +TabDockClients=ProjectManager,ModelViewTool,DataExplorerContainer,frmDesignPreview,TFileExplorerForm + +[DockSite3] +HostDockSite=LeftDockTabSet +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1898 +Height=7164 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1773 +ClientHeight=6738 +TBDockHeight=7164 +LRDockWidth=1898 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=StructureView +TabDockClients=StructureView,ClassBrowserTool + +[DockSite4] +HostDockSite=DockRightPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=449 +Width=2000 +Height=2735 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=2735 +TBDockHeight=7164 +LRDockWidth=2000 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=ToolForm +TabDockClients=ToolForm,TemplateView + diff --git a/demos/TabbedBrowser/TabBrowser.identcache b/demos/TabbedBrowser/TabBrowser.identcache new file mode 100644 index 00000000..7ca1c1e9 Binary files /dev/null and b/demos/TabbedBrowser/TabBrowser.identcache differ diff --git a/demos/TabbedBrowser/TabBrowser.res b/demos/TabbedBrowser/TabBrowser.res new file mode 100644 index 00000000..ae539ed0 Binary files /dev/null and b/demos/TabbedBrowser/TabBrowser.res differ diff --git a/demos/TabbedBrowser/TabBrowser.stat b/demos/TabbedBrowser/TabBrowser.stat new file mode 100644 index 00000000..0b0eb14c --- /dev/null +++ b/demos/TabbedBrowser/TabBrowser.stat @@ -0,0 +1,10 @@ +[Stats] +EditorSecs=5580 +DesignerSecs=425 +InspectorSecs=86 +CompileSecs=93874 +OtherSecs=187 +StartTime=22/09/2017 23:12:56 +RealKeys=0 +EffectiveKeys=0 +DebugSecs=699 diff --git a/demos/TabbedBrowser/TabbedBrowser.dsk b/demos/TabbedBrowser/TabbedBrowser.dsk new file mode 100644 index 00000000..26723ee2 --- /dev/null +++ b/demos/TabbedBrowser/TabbedBrowser.dsk @@ -0,0 +1,776 @@ +[Closed Files] +File_0=TSourceModule,'c:\program files (x86)\embarcadero\studio\19.0\source\rtl\common\System.Classes.pas',0,1,3813,1,3835,0,0,, +File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes_UI\uTabRow.pas',0,1,945,67,973,0,0,, +File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uBrowserTabBody.pas',0,1,2306,1,2328,0,0,, +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uWebPanel.pas',0,1,3140,82,3177,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uHTTPCEFPanel.pas',0,1,3651,77,3681,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uTabbedBrowser.pas',0,1,2309,50,2341,0,0,, +File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uTabContentsPanel.pas',0,1,348,48,369,0,0,, +File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes\base_components\uHTTPIEPanel.pas',0,1,1963,56,1993,0,0,,{1 +File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\Componentes_Int\uWebBrowserEx2.pas',0,1,152,3,178,0,0,, +File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTypes.pas',0,1,413,56,435,0,0,, + +[Modules] +Module0=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas +Module1=default.htm +Count=2 +EditWindowCount=1 + +[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas] +ModuleType=TSourceModule + +[default.htm] +ModuleType=TURLModule + +[EditWindow0] +ViewCount=2 +CurrentEditView=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas +View0=0 +View1=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=10000 +Height=9417 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=10000 +ClientHeight=9417 +DockedToMainForm=1 +BorlandEditorCodeExplorer=BorlandEditorCodeExplorer@EditWindow0 +TopPanelSize=0 +LeftPanelSize=1898 +LeftPanelClients=PropertyInspector +LeftPanelData=00000800010100000000A219000000000000016A070000000000000100000000972300001100000050726F7065727479496E73706563746F72FFFFFFFF +RightPanelSize=2000 +RightPanelClients=DockSite4 +RightPanelData=00000800010100000000A21900000000000001D00700000000000001000000009723000009000000446F636B5369746534FFFFFFFF +BottomPanelSize=0 +BottomPanelClients=DockSite1,MessageView +BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF +BottomMiddlePanelSize=0 +BottomMiddlePanelClients=DockSite0,GraphDrawingModel +BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF +TabDockLeftClients=DockSite3=0 +TabDockRightClients=DockSite2=0 + +[View0] +CustomEditViewType=TWelcomePageView +WelcomePageURL=bds:/default.htm + +[View1] +CustomEditViewType=TEditView +Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\demos\TabbedBrowser\uMainForm.pas +CursorX=1 +CursorY=30 +TopLine=29 +LeftCol=1 +Elisions= +Bookmarks= +EditViewName=Borland.FormDesignerView + +[UndockedDesigner] +Count=0 + +[Watches] +Count=0 + +[WatchWindow] +WatchColumnWidth=120 +WatchShowColumnHeaders=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1143 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1143 +TBDockHeight=213 +LRDockWidth=13602 +Dockable=1 +StayOnTop=0 + +[Breakpoints] +Count=0 + +[EmbarcaderoWin32Debugger_AddressBreakpoints] +Count=0 + +[EmbarcaderoWin64Debugger_AddressBreakpoints] +Count=0 + +[Main Window] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=0 +State=2 +Left=148 +Top=269 +Width=8930 +Height=8520 +MaxLeft=-8 +MaxTop=-11 +MaxWidth=8930 +MaxHeight=8520 +ClientWidth=10000 +ClientHeight=9753 +BottomPanelSize=9111 +BottomPanelClients=EditWindow0 +BottomPanelData=0000080000000000000000000000000000000000000000000000000100000000000000000C0000004564697457696E646F775F30FFFFFFFF + +[ProjectManager] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1875 +Height=6513 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1875 +ClientHeight=6513 +TBDockHeight=5897 +LRDockWidth=2352 +Dockable=1 +StayOnTop=0 + +[MessageView] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2773 +Height=1424 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2773 +ClientHeight=1424 +TBDockHeight=1424 +LRDockWidth=2773 +Dockable=1 +StayOnTop=0 + +[ToolForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2000 +Height=9215 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=9215 +TBDockHeight=7152 +LRDockWidth=2000 +Dockable=1 +StayOnTop=0 + +[ClipboardHistory] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=1906 +Height=4989 +MaxLeft=-8 +MaxTop=-11 +ClientWidth=1781 +ClientHeight=4563 +TBDockHeight=4989 +LRDockWidth=1906 +Dockable=1 +StayOnTop=0 + +[ProjectStatistics] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=2062 +Height=5740 +MaxLeft=-8 +MaxTop=-11 +ClientWidth=1938 +ClientHeight=5314 +TBDockHeight=5740 +LRDockWidth=2062 +Dockable=1 +StayOnTop=0 + +[ClassBrowserTool] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-8 +Top=-30 +Width=1844 +Height=3139 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1844 +ClientHeight=3139 +TBDockHeight=3139 +LRDockWidth=1844 +Dockable=1 +StayOnTop=0 + +[MetricsView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=4832 +LRDockWidth=3562 +Dockable=1 +StayOnTop=0 + +[QAView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=4832 +LRDockWidth=3562 +Dockable=1 +StayOnTop=0 + +[PropertyInspector] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=18 +Width=1898 +Height=9215 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1898 +ClientHeight=9215 +TBDockHeight=7220 +LRDockWidth=1898 +Dockable=1 +StayOnTop=0 +SplitPos=111 + +[PropInspDesignerSelection] +ArrangeBy=Name +SelectedItem=Align, +ExpandedItems=Anchors=0,BorderIcons=0,Constraints=0,Font=0,GlassFrame=0,HorzScrollBar=0,LiveBindings=0,"LiveBindings Designer=0",Margins=0,Padding=1,StyleElements=0,Touch=0,VertScrollBar=0,BevelEdges=0 + +[frmDesignPreview] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1875 +Height=6513 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1875 +ClientHeight=6513 +TBDockHeight=5964 +LRDockWidth=2508 +Dockable=1 +StayOnTop=0 + +[TFileExplorerForm] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-954 +Top=-7 +Width=2844 +Height=6200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2844 +ClientHeight=6200 +TBDockHeight=6200 +LRDockWidth=2844 +Dockable=1 +StayOnTop=0 + +[TemplateView] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=-1024 +Top=247 +Width=273 +Height=359 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=273 +ClientHeight=359 +TBDockHeight=359 +LRDockWidth=273 +Dockable=1 +StayOnTop=0 +Name=120 +Description=334 +filter=1 + +[DebugLogView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1143 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1143 +TBDockHeight=415 +LRDockWidth=4953 +Dockable=1 +StayOnTop=0 + +[ThreadStatusWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1143 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1143 +TBDockHeight=213 +LRDockWidth=7406 +Dockable=1 +StayOnTop=0 +Column0Width=145 +Column1Width=100 +Column2Width=115 +Column3Width=250 + +[LocalVarsWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1143 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1143 +TBDockHeight=1536 +LRDockWidth=3484 +Dockable=1 +StayOnTop=0 + +[CallStackWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1143 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1143 +TBDockHeight=2063 +LRDockWidth=3484 +Dockable=1 +StayOnTop=0 + +[PatchForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=2500 +LRDockWidth=3398 +Dockable=1 +StayOnTop=0 + +[FindReferencsForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=964 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=964 +TBDockHeight=2321 +LRDockWidth=2820 +Dockable=1 +StayOnTop=0 + +[RefactoringForm] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=3206 +LRDockWidth=2820 +Dockable=1 +StayOnTop=0 + +[ToDo List] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1200 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1200 +TBDockHeight=1155 +LRDockWidth=3680 +Dockable=1 +StayOnTop=0 +Column0Width=314 +Column1Width=30 +Column2Width=150 +Column3Width=172 +Column4Width=129 +SortOrder=4 +ShowHints=1 +ShowChecked=1 + +[DataExplorerContainer] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1875 +Height=6513 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1875 +ClientHeight=6513 +TBDockHeight=4888 +LRDockWidth=7148 +Dockable=1 +StayOnTop=0 + +[GraphDrawingModel] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=249 +Top=709 +Width=2859 +Height=3206 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2859 +ClientHeight=3206 +TBDockHeight=3206 +LRDockWidth=2859 +Dockable=1 +StayOnTop=0 + +[BreakpointWindow] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=3820 +Height=1143 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1143 +TBDockHeight=1547 +LRDockWidth=8742 +Dockable=1 +StayOnTop=0 +Column0Width=200 +Column1Width=75 +Column2Width=200 +Column3Width=200 +Column4Width=200 +Column5Width=75 +Column6Width=75 + +[StructureView] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1773 +Height=6794 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1773 +ClientHeight=6794 +TBDockHeight=3677 +LRDockWidth=1898 +Dockable=1 +StayOnTop=0 + +[ModelViewTool] +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1875 +Height=6513 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1875 +ClientHeight=6513 +TBDockHeight=4888 +LRDockWidth=5305 +Dockable=1 +StayOnTop=0 + +[BorlandEditorCodeExplorer@EditWindow0] +PercentageSizes=1 +Create=1 +Visible=0 +Docked=0 +State=0 +Left=0 +Top=0 +Width=1828 +Height=6177 +MaxLeft=-8 +MaxTop=-11 +ClientWidth=1703 +ClientHeight=5751 +TBDockHeight=6177 +LRDockWidth=1828 +Dockable=1 +StayOnTop=0 + +[DockHosts] +DockHostCount=5 + +[DockSite0] +HostDockSite=DockBottomCenterPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=0 +Width=2336 +Height=1480 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2336 +ClientHeight=1480 +TBDockHeight=1480 +LRDockWidth=2336 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=RefactoringForm +TabDockClients=RefactoringForm,PatchForm,FindReferencsForm,ToDo List,MetricsView,QAView + +[DockSite1] +HostDockSite=DockBottomPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=18 +Width=3820 +Height=1424 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=3820 +ClientHeight=1424 +TBDockHeight=1424 +LRDockWidth=3820 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=DebugLogView +TabDockClients=DebugLogView,BreakpointWindow,ThreadStatusWindow,CallStackWindow,WatchWindow,LocalVarsWindow + +[DockSite2] +HostDockSite=RightTabDock +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=1024 +Top=52 +Width=2000 +Height=7220 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1875 +ClientHeight=6794 +TBDockHeight=7220 +LRDockWidth=2000 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=ProjectManager +TabDockClients=ProjectManager,ModelViewTool,DataExplorerContainer,frmDesignPreview,TFileExplorerForm + +[DockSite3] +HostDockSite=LeftDockTabSet +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=0 +Docked=1 +State=0 +Left=0 +Top=0 +Width=1898 +Height=7220 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=1773 +ClientHeight=6794 +TBDockHeight=7220 +LRDockWidth=1898 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=StructureView +TabDockClients=StructureView,ClassBrowserTool + +[DockSite4] +HostDockSite=DockRightPanel +DockSiteType=1 +PercentageSizes=1 +Create=1 +Visible=1 +Docked=1 +State=0 +Left=0 +Top=18 +Width=2000 +Height=9215 +MaxLeft=-1 +MaxTop=-1 +ClientWidth=2000 +ClientHeight=9215 +TBDockHeight=7220 +LRDockWidth=2000 +Dockable=1 +StayOnTop=0 +TabPosition=1 +ActiveTabID=ToolForm +TabDockClients=ToolForm,TemplateView + diff --git a/demos/TabbedBrowser/TabbedBrowser.identcache b/demos/TabbedBrowser/TabbedBrowser.identcache new file mode 100644 index 00000000..3197eb29 Binary files /dev/null and b/demos/TabbedBrowser/TabbedBrowser.identcache differ diff --git a/demos/TabbedBrowser/TabbedBrowser.res b/demos/TabbedBrowser/TabbedBrowser.res new file mode 100644 index 00000000..b9e21c94 Binary files /dev/null and b/demos/TabbedBrowser/TabbedBrowser.res differ diff --git a/demos/TabbedBrowser/TabbedBrowser.stat b/demos/TabbedBrowser/TabbedBrowser.stat new file mode 100644 index 00000000..8c401a1c --- /dev/null +++ b/demos/TabbedBrowser/TabbedBrowser.stat @@ -0,0 +1,10 @@ +[Stats] +EditorSecs=2610 +DesignerSecs=614 +InspectorSecs=126 +CompileSecs=55886 +OtherSecs=239 +StartTime=22/09/2017 21:40:28 +RealKeys=0 +EffectiveKeys=0 +DebugSecs=131 diff --git a/demos/TabbedBrowser/cef.inc b/demos/TabbedBrowser/cef.inc new file mode 100644 index 00000000..984ae795 --- /dev/null +++ b/demos/TabbedBrowser/cef.inc @@ -0,0 +1,384 @@ +// ************************************************************************ +// ***************************** CEF4Delphi ******************************* +// ************************************************************************ +// +// CEF4Delphi is based on DCEF3 which uses CEF3 to embed a chromium-based +// browser in Delphi applications. +// +// The original license of DCEF3 still applies to CEF4Delphi. +// +// For more information about CEF4Delphi visit : +// https://www.briskbard.com/index.php?lang=en&pageid=cef +// +// Copyright © 2017 Salvador Díaz Fau. All rights reserved. +// +// ************************************************************************ +// ************ vvvv Original license and comments below vvvv ************* +// ************************************************************************ +(* + * Delphi Chromium Embedded 3 + * + * Usage allowed under the restrictions of the Lesser GNU General Public License + * or alternatively the restrictions of the Mozilla Public License 1.1 + * + * Software distributed under the License is distributed on an "AS IS" basis, + * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for + * the specific language governing rights and limitations under the License. + * + * Unit owner : Henri Gourvest + * Web site : http://www.progdigy.com + * Repository : http://code.google.com/p/delphichromiumembedded/ + * Group : http://groups.google.com/group/delphichromiumembedded + * + * Embarcadero Technologies, Inc is not permitted to use or redistribute + * this source code without explicit permission. + * + *) + + // The complete list of compiler versions is here : + // http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Compiler_Versions + +{$DEFINE DELPHI_VERSION_UNKNOW} + +{$IFDEF FPC} + {$DEFINE CEF_MULTI_THREADED_MESSAGE_LOOP} + {$DEFINE SUPPORTS_INLINE} +{$ENDIF} + +// Delphi 5 +{$IFDEF VER130} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} +{$ENDIF} + +// Delphi 6 +{$IFDEF VER140} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} +{$ENDIF} + +// Delphi 7 +{$IFDEF VER150} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} +{$ENDIF} + +// Delphi 8 +{$IFDEF VER160} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} +{$ENDIF} + +// Delphi 2005 +{$IFDEF VER170} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} +{$ENDIF} + +{$IFDEF VER180} + {$UNDEF DELPHI_VERSION_UNKNOW} + // Delphi 2007 + {$IFDEF VER185} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + // Delphi 2006 + {$ELSE} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$ENDIF} +{$ENDIF} + +// Delphi 2009 +{$IFDEF VER200} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} +{$ENDIF} + +//Delphi 2010 +{$IFDEF VER210} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} +{$ENDIF} + +// Delphi XE +{$IFDEF VER220} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} +{$ENDIF} + +// Delphi XE2 +{$IFDEF VER230} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} +{$ENDIF} + +// Delphi XE3 +{$IFDEF VER240} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} +{$ENDIF} + +// Delphi XE4 +{$IFDEF VER250} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} +{$ENDIF} + +// Delphi XE5 +{$IFDEF VER260} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} +{$ENDIF} + +// Delphi XE6 +{$IFDEF VER270} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} +{$ENDIF} + +// Delphi XE7 +{$IFDEF VER280} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} + {$DEFINE DELPHI21_UP} +{$ENDIF} + +// Delphi XE8 +{$IFDEF VER290} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} + {$DEFINE DELPHI21_UP} + {$DEFINE DELPHI22_UP} +{$ENDIF VER290} + +// Rad Studio 10 - Delphi Seattle +{$IFDEF VER300} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} + {$DEFINE DELPHI21_UP} + {$DEFINE DELPHI22_UP} + {$DEFINE DELPHI23_UP} +{$ENDIF} + +// Rad Studio 10.1 - Delphi Berlin +{$IFDEF VER310} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} + {$DEFINE DELPHI21_UP} + {$DEFINE DELPHI22_UP} + {$DEFINE DELPHI23_UP} + {$DEFINE DELPHI24_UP} +{$ENDIF} + +// Rad Studio 10.2 - Delphi Tokyo +{$IFDEF VER320} + {$UNDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} + {$DEFINE DELPHI21_UP} + {$DEFINE DELPHI22_UP} + {$DEFINE DELPHI23_UP} + {$DEFINE DELPHI24_UP} + {$DEFINE DELPHI25_UP} +{$ENDIF} + + +{$IFDEF DELPHI_VERSION_UNKNOW} + {$DEFINE DELPHI5_UP} + {$DEFINE DELPHI6_UP} + {$DEFINE DELPHI7_UP} + {$DEFINE DELPHI8_UP} + {$DEFINE DELPHI9_UP} + {$DEFINE DELPHI10_UP} + {$DEFINE DELPHI11_UP} + {$DEFINE DELPHI12_UP} + {$DEFINE DELPHI14_UP} + {$DEFINE DELPHI15_UP} + {$DEFINE DELPHI16_UP} + {$DEFINE DELPHI17_UP} + {$DEFINE DELPHI18_UP} + {$DEFINE DELPHI19_UP} + {$DEFINE DELPHI20_UP} + {$DEFINE DELPHI21_UP} + {$DEFINE DELPHI22_UP} + {$DEFINE DELPHI23_UP} + {$DEFINE DELPHI24_UP} + {$DEFINE DELPHI25_UP} +{$ENDIF} + +{$IFDEF DELPHI9_UP} + {$DEFINE SUPPORTS_INLINE} +{$ENDIF} + diff --git a/demos/TabbedBrowser/uMainForm.dfm b/demos/TabbedBrowser/uMainForm.dfm new file mode 100644 index 00000000..e7287283 --- /dev/null +++ b/demos/TabbedBrowser/uMainForm.dfm @@ -0,0 +1,214 @@ +object MainForm: TMainForm + Left = 0 + Top = 0 + Caption = 'Tab Browser' + ClientHeight = 573 + ClientWidth = 732 + Color = clBtnFace + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -11 + Font.Name = 'Tahoma' + Font.Style = [] + OldCreateOrder = False + Position = poScreenCenter + OnCloseQuery = FormCloseQuery + OnShow = FormShow + PixelsPerInch = 96 + TextHeight = 13 + object ButtonPnl: TPanel + Left = 0 + Top = 0 + Width = 732 + Height = 35 + Align = alTop + BevelOuter = bvNone + Caption = 'ButtonPnl' + Padding.Left = 5 + Padding.Top = 5 + Padding.Right = 5 + Padding.Bottom = 5 + ShowCaption = False + TabOrder = 0 + ExplicitWidth = 684 + object NavButtonPnl: TPanel + Left = 5 + Top = 5 + Width = 183 + Height = 25 + Align = alLeft + BevelOuter = bvNone + ShowCaption = False + TabOrder = 1 + object BackBtn: TButton + Left = 63 + Top = 0 + Width = 25 + Height = 25 + Caption = '3' + Font.Charset = SYMBOL_CHARSET + Font.Color = clWindowText + Font.Height = -19 + Font.Name = 'Webdings' + Font.Style = [] + ParentFont = False + TabOrder = 2 + OnClick = BackBtnClick + end + object ForwardBtn: TButton + Left = 93 + Top = 0 + Width = 25 + Height = 25 + Caption = '4' + Font.Charset = SYMBOL_CHARSET + Font.Color = clWindowText + Font.Height = -19 + Font.Name = 'Webdings' + Font.Style = [] + ParentFont = False + TabOrder = 3 + OnClick = ForwardBtnClick + end + object ReloadBtn: TButton + Left = 123 + Top = 0 + Width = 25 + Height = 25 + Caption = 'q' + Font.Charset = SYMBOL_CHARSET + Font.Color = clWindowText + Font.Height = -19 + Font.Name = 'Webdings' + Font.Style = [] + ParentFont = False + TabOrder = 4 + OnClick = ReloadBtnClick + end + object StopBtn: TButton + Left = 153 + Top = 0 + Width = 25 + Height = 25 + Caption = '=' + Font.Charset = SYMBOL_CHARSET + Font.Color = clWindowText + Font.Height = -19 + Font.Name = 'Webdings' + Font.Style = [] + ParentFont = False + TabOrder = 5 + OnClick = StopBtnClick + end + object AddTabBtn: TButton + Left = 1 + Top = 0 + Width = 25 + Height = 25 + Caption = '+' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Tahoma' + Font.Style = [] + ParentFont = False + TabOrder = 0 + OnClick = AddTabBtnClick + end + object RemoveTabBtn: TButton + Left = 32 + Top = 0 + Width = 25 + Height = 25 + Caption = '-' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Tahoma' + Font.Style = [] + ParentFont = False + TabOrder = 1 + OnClick = RemoveTabBtnClick + end + end + object ConfigPnl: TPanel + Left = 695 + Top = 5 + Width = 32 + Height = 25 + Align = alRight + BevelOuter = bvNone + TabOrder = 2 + ExplicitLeft = 648 + object GoBtn: TButton + Left = 6 + Top = 0 + Width = 25 + Height = 25 + Caption = #9658 + Font.Charset = ANSI_CHARSET + Font.Color = clWindowText + Font.Height = -17 + Font.Name = 'Arial' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 0 + OnClick = GoBtnClick + end + end + object URLEditPnl: TPanel + Left = 188 + Top = 5 + Width = 507 + Height = 25 + Align = alClient + BevelOuter = bvNone + Padding.Top = 2 + ShowCaption = False + TabOrder = 0 + ExplicitLeft = 190 + ExplicitWidth = 458 + object URLCbx: TComboBox + Left = 0 + Top = 2 + Width = 507 + Height = 21 + Align = alClient + ItemIndex = 0 + TabOrder = 0 + Text = 'https://www.google.com' + Items.Strings = ( + 'https://www.google.com' + + 'https://www.whatismybrowser.com/detect/what-http-headers-is-my-b' + + 'rowser-sending' + '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/' + 'http://webglsamples.org/' + 'https://www.youtube.com' + 'https://html5demos.com/drag/' + + 'https://developers.google.com/maps/documentation/javascript/exam' + + 'ples/streetview-embed?hl=fr') + ExplicitTop = 1 + ExplicitWidth = 456 + end + end + end + object PageControl1: TPageControl + Left = 0 + Top = 35 + Width = 732 + Height = 538 + Align = alClient + TabOrder = 1 + OnChange = PageControl1Change + ExplicitWidth = 684 + ExplicitHeight = 497 + end +end diff --git a/demos/TabbedBrowser/uMainForm.pas b/demos/TabbedBrowser/uMainForm.pas new file mode 100644 index 00000000..6e76f455 --- /dev/null +++ b/demos/TabbedBrowser/uMainForm.pas @@ -0,0 +1,409 @@ +// ************************************************************************ +// ***************************** CEF4Delphi ******************************* +// ************************************************************************ +// +// CEF4Delphi is based on DCEF3 which uses CEF3 to embed a chromium-based +// browser in Delphi applications. +// +// The original license of DCEF3 still applies to CEF4Delphi. +// +// For more information about CEF4Delphi visit : +// https://www.briskbard.com/index.php?lang=en&pageid=cef +// +// Copyright © 2017 Salvador Díaz Fau. All rights reserved. +// +// ************************************************************************ +// ************ vvvv Original license and comments below vvvv ************* +// ************************************************************************ +(* + * Delphi Chromium Embedded 3 + * + * Usage allowed under the restrictions of the Lesser GNU General Public License + * or alternatively the restrictions of the Mozilla Public License 1.1 + * + * Software distributed under the License is distributed on an "AS IS" basis, + * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for + * the specific language governing rights and limitations under the License. + * + * Unit owner : Henri Gourvest + * Web site : http://www.progdigy.com + * Repository : http://code.google.com/p/delphichromiumembedded/ + * Group : http://groups.google.com/group/delphichromiumembedded + * + * Embarcadero Technologies, Inc is not permitted to use or redistribute + * this source code without explicit permission. + * + *) + +unit uMainForm; + +{$I cef.inc} + +interface + +uses + {$IFDEF DELPHI16_UP} + Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, + Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ComCtrls, Vcl.Buttons, Vcl.ExtCtrls, + {$ELSE} + Windows, Messages, SysUtils, Variants, Classes, Graphics, + Controls, Forms, Dialogs, ComCtrls, Buttons, ExtCtrls, + {$ENDIF} + uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFApplication, uCEFTypes, uCEFConstants, + Vcl.StdCtrls; + +const + CEFBROWSER_DESTROYWNDPARENT = WM_APP + $100; + CEFBROWSER_DESTROYTAB = WM_APP + $101; + +type + TMainForm = class(TForm) + PageControl1: TPageControl; + ButtonPnl: TPanel; + NavButtonPnl: TPanel; + BackBtn: TButton; + ForwardBtn: TButton; + ReloadBtn: TButton; + StopBtn: TButton; + ConfigPnl: TPanel; + GoBtn: TButton; + URLEditPnl: TPanel; + URLCbx: TComboBox; + AddTabBtn: TButton; + RemoveTabBtn: TButton; + procedure AddTabBtnClick(Sender: TObject); + procedure RemoveTabBtnClick(Sender: TObject); + procedure FormShow(Sender: TObject); + procedure PageControl1Change(Sender: TObject); + procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean); + procedure BackBtnClick(Sender: TObject); + procedure ForwardBtnClick(Sender: TObject); + procedure ReloadBtnClick(Sender: TObject); + procedure StopBtnClick(Sender: TObject); + procedure GoBtnClick(Sender: TObject); + + protected + FDestroying : boolean; + + procedure Chromium_OnAfterCreated(Sender: TObject; const browser: ICefBrowser); + procedure Chromium_OnAddressChange(Sender: TObject; const browser: ICefBrowser; const frame: ICefFrame; const url: ustring); + procedure Chromium_OnTitleChange(Sender: TObject; const browser: ICefBrowser; const title: ustring); + procedure Chromium_OnClose(Sender: TObject; const browser: ICefBrowser; out Result: Boolean); + procedure Chromium_OnBeforeClose(Sender: TObject; const browser: ICefBrowser); + + procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED; + procedure BrowserDestroyWindowParentMsg(var aMessage : TMessage); message CEFBROWSER_DESTROYWNDPARENT; + procedure BrowserDestroyTabMsg(var aMessage : TMessage); message CEFBROWSER_DESTROYTAB; + procedure WMMove(var aMessage : TWMMove); message WM_MOVE; + procedure WMMoving(var aMessage : TMessage); message WM_MOVING; + + function GetPageIndex(const aSender : TObject; var aPageIndex : integer) : boolean; + procedure NotifyMoveOrResizeStarted; + function SearchChromium(aPageIndex : integer; var aChromium : TChromium) : boolean; + function SearchWindowParent(aPageIndex : integer; var aWindowParent : TCEFWindowParent) : boolean; + + public + { Public declarations } + end; + +var + MainForm: TMainForm; + +implementation + +{$R *.dfm} + +// This is just a simplified demo with tab handling. +// It's not meant to be a complete browser or the best way to implement a tabbed browser. + +// In this demo all browsers share the buttons and URL combobox. +// All TChromium components share the same functions for their events sending the +// PageIndex of the Tab where they are included in the Message.lParam parameter if necessary. + +// For simplicity the Button panel and the PageControl are disabled while adding or removing tab sheets. +// The Form can't be closed if it's desrtoying a tab. + +// In case of closing a tab sheet, the destruction sequence is this : +// 1. RemoveTabBtnClick calls TChromium.CloseBrowser of the selected tab which triggers a TChromium.OnClose event. +// 2. TChromium.OnClose sends a CEFBROWSER_DESTROYWNDPARENT message to destroy TCEFWindowParent in the main thread which triggers a TChromium.OnBeforeClose event. +// 3. TChromium.OnBeforeClose sends a CEFBROWSER_DESTROYTAB message to destroy the tab in the main thread. + +procedure TMainForm.AddTabBtnClick(Sender: TObject); +var + TempSheet : TTabSheet; + TempWindowParent : TCEFWindowParent; + TempChromium : TChromium; +begin + ButtonPnl.Enabled := False; + PageControl1.Enabled := False; + + TempSheet := TTabSheet.Create(PageControl1); + TempSheet.Caption := 'New Tab'; + TempSheet.PageControl := PageControl1; + + TempWindowParent := TCEFWindowParent.Create(TempSheet); + TempWindowParent.Parent := TempSheet; + TempWindowParent.Color := clWhite; + TempWindowParent.Align := alClient; + + TempChromium := TChromium.Create(TempSheet); + TempChromium.OnAfterCreated := Chromium_OnAfterCreated; + TempChromium.OnAddressChange := Chromium_OnAddressChange; + TempChromium.OnTitleChange := Chromium_OnTitleChange; + TempChromium.OnClose := Chromium_OnClose; + TempChromium.OnBeforeClose := Chromium_OnBeforeClose; + + TempChromium.CreateBrowser(TempWindowParent, ''); +end; + +procedure TMainForm.RemoveTabBtnClick(Sender: TObject); +var + TempChromium : TChromium; +begin + if SearchChromium(PageControl1.TabIndex, TempChromium) then + begin + FDestroying := True; + ButtonPnl.Enabled := False; + PageControl1.Enabled := False; + TempChromium.CloseBrowser(True); + end; +end; + +procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean); +begin + CanClose := not(FDestroying); +end; + +procedure TMainForm.FormShow(Sender: TObject); +begin + AddTabBtn.Click; +end; + +procedure TMainForm.ForwardBtnClick(Sender: TObject); +var + TempChromium : TChromium; +begin + if SearchChromium(PageControl1.TabIndex, TempChromium) then TempChromium.GoForward; +end; + +procedure TMainForm.GoBtnClick(Sender: TObject); +var + TempChromium : TChromium; +begin + if SearchChromium(PageControl1.TabIndex, TempChromium) then TempChromium.LoadURL(URLCbx.Text); +end; + +procedure TMainForm.ReloadBtnClick(Sender: TObject); +var + TempChromium : TChromium; +begin + if SearchChromium(PageControl1.TabIndex, TempChromium) then TempChromium.Reload; +end; + +procedure TMainForm.BackBtnClick(Sender: TObject); +var + TempChromium : TChromium; +begin + if SearchChromium(PageControl1.TabIndex, TempChromium) then TempChromium.GoBack; +end; + +procedure TMainForm.StopBtnClick(Sender: TObject); +var + TempChromium : TChromium; +begin + if SearchChromium(PageControl1.TabIndex, TempChromium) then TempChromium.StopLoad; +end; + +procedure TMainForm.BrowserCreatedMsg(var aMessage : TMessage); +var + TempWindowParent : TCEFWindowParent; + TempChromium : TChromium; +begin + ButtonPnl.Enabled := True; + PageControl1.Enabled := True; + + if SearchWindowParent(aMessage.lParam, TempWindowParent) then + TempWindowParent.UpdateSize; + + if SearchChromium(aMessage.lParam, TempChromium) then + TempChromium.LoadURL(URLCbx.Items[0]); +end; + +procedure TMainForm.BrowserDestroyWindowParentMsg(var aMessage : TMessage); +var + TempWindowParent : TCEFWindowParent; +begin + if SearchWindowParent(aMessage.lParam, TempWindowParent) then TempWindowParent.Free; +end; + +procedure TMainForm.BrowserDestroyTabMsg(var aMessage : TMessage); +begin + if (aMessage.lParam >= 0) and + (aMessage.lParam < PageControl1.PageCount) then + PageControl1.Pages[aMessage.lParam].Free; + + ButtonPnl.Enabled := True; + PageControl1.Enabled := True; + FDestroying := False; +end; + +procedure TMainForm.Chromium_OnAfterCreated(Sender: TObject; const browser: ICefBrowser); +var + TempPageIndex : integer; +begin + if GetPageIndex(Sender, TempPageIndex) then + PostMessage(Handle, CEF_AFTERCREATED, 0, TempPageIndex); +end; + +procedure TMainForm.Chromium_OnAddressChange(Sender: TObject; const browser: ICefBrowser; const frame: ICefFrame; const url: ustring); +var + TempPageIndex : integer; +begin + if (PageControl1.TabIndex >= 0) and + GetPageIndex(Sender, TempPageIndex) and + (PageControl1.Pages[PageControl1.TabIndex].PageIndex = TempPageIndex) then + URLCbx.Text := url; +end; + +function TMainForm.GetPageIndex(const aSender : TObject; var aPageIndex : integer) : boolean; +begin + Result := False; + aPageIndex := -1; + + if (aSender <> nil) and + (aSender is TComponent) and + (TComponent(aSender).Owner <> nil) and + (TComponent(aSender).Owner is TTabSheet) then + begin + aPageIndex := TTabSheet(TComponent(aSender).Owner).PageIndex; + Result := True; + end; +end; + +procedure TMainForm.Chromium_OnTitleChange(Sender: TObject; const browser: ICefBrowser; const title: ustring); +var + TempPageIndex : integer; +begin + if GetPageIndex(Sender, TempPageIndex) then + PageControl1.Pages[TempPageIndex].Caption := title; +end; + +procedure TMainForm.Chromium_OnClose(Sender: TObject; const browser: ICefBrowser; out Result: Boolean); +var + TempPageIndex : integer; +begin + if GetPageIndex(Sender, TempPageIndex) then + PostMessage(Handle, CEFBROWSER_DESTROYWNDPARENT, 0, TempPageIndex); + + Result := False; +end; + +procedure TMainForm.Chromium_OnBeforeClose(Sender: TObject; const browser: ICefBrowser); +var + TempPageIndex : integer; +begin + if GetPageIndex(Sender, TempPageIndex) then + PostMessage(Handle, CEFBROWSER_DESTROYTAB, 0, TempPageIndex); +end; + +function TMainForm.SearchChromium(aPageIndex : integer; var aChromium : TChromium) : boolean; +var + i, j : integer; + TempComponent : TComponent; + TempSheet : TTabSheet; +begin + Result := False; + aChromium := nil; + + if (aPageIndex >= 0) and (aPageIndex < PageControl1.PageCount) then + begin + TempSheet := PageControl1.Pages[aPageIndex]; + i := 0; + j := TempSheet.ComponentCount; + + while (i < j) and not(Result) do + begin + TempComponent := TempSheet.Components[i]; + + if (TempComponent <> nil) and (TempComponent is TChromium) then + begin + aChromium := TChromium(TempComponent); + Result := True; + end + else + inc(i); + end; + end; +end; + +function TMainForm.SearchWindowParent(aPageIndex : integer; var aWindowParent : TCEFWindowParent) : boolean; +var + i, j : integer; + TempControl : TControl; + TempSheet : TTabSheet; +begin + Result := False; + aWindowParent := nil; + + if (aPageIndex >= 0) and (aPageIndex < PageControl1.PageCount) then + begin + TempSheet := PageControl1.Pages[aPageIndex]; + i := 0; + j := TempSheet.ControlCount; + + while (i < j) and not(Result) do + begin + TempControl := TempSheet.Controls[i]; + + if (TempControl <> nil) and (TempControl is TCEFWindowParent) then + begin + aWindowParent := TCEFWindowParent(TempControl); + Result := True; + end + else + inc(i); + end; + end; +end; + +procedure TMainForm.NotifyMoveOrResizeStarted; +var + i, j : integer; + TempChromium : TChromium; +begin + if not(showing) or (PageControl1 = nil) then exit; + + i := 0; + j := PageControl1.PageCount; + + while (i < j) do + begin + if SearchChromium(i, TempChromium) then TempChromium.NotifyMoveOrResizeStarted; + + inc(i); + end; +end; + +procedure TMainForm.WMMove(var aMessage : TWMMove); +begin + inherited; + + NotifyMoveOrResizeStarted; +end; + +procedure TMainForm.WMMoving(var aMessage : TMessage); +begin + inherited; + + NotifyMoveOrResizeStarted; +end; + +procedure TMainForm.PageControl1Change(Sender: TObject); +var + TempChromium : TChromium; +begin + if showing and SearchChromium(PageControl1.TabIndex, TempChromium) then + URLCbx.Text := TempChromium.DocumentURL; +end; + +end. diff --git a/source/CEF4Delphi.dsk b/source/CEF4Delphi.dsk index 0b735272..d0b3f9a5 100644 --- a/source/CEF4Delphi.dsk +++ b/source/CEF4Delphi.dsk @@ -1,50 +1,27 @@ [Closed Files] -File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumEvents.pas',0,1,1,1,1,0,0,, -File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,711,66,737,0,0,,{1 -File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFCookieManager.pas',0,1,21,23,38,0,0,, -File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,506,3,524,0,0,, -File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFExtension.pas',0,1,48,82,110,0,0,, -File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFExtensionHandler.pas',0,1,163,83,302,0,0,, -File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFGetExtensionResourceCallback.pas',0,1,34,38,53,0,0,, -File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFRequestContextHandler.pas',0,1,43,31,55,0,0,, +File_0=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFApplication.pas',0,1,30,39,60,0,0,, +File_1=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas',0,1,1387,32,1417,0,0,,{1 +File_2=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas',0,1,222,49,270,0,0,,{1 +File_3=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBrowser.pas',0,1,185,54,203,0,0,, +File_4=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFStringVisitor.pas',0,1,98,56,131,0,0,, +File_5=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas',0,1,186,45,204,0,0,,{1 +File_6=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromiumEvents.pas',0,1,1,1,1,0,0,, +File_7=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFCookieManager.pas',0,1,21,23,38,0,0,, +File_8=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFMiscFunctions.pas',0,1,506,3,524,0,0,, +File_9=TSourceModule,'C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFExtension.pas',0,1,48,82,110,0,0,, [Modules] Module0=default.htm -Module1=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas -Module2=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBrowser.pas -Module3=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas -Module4=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas -Module5=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFStringVisitor.pas -Count=6 +Count=1 EditWindowCount=1 [default.htm] ModuleType=TURLModule -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas] -ModuleType=TSourceModule - -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBrowser.pas] -ModuleType=TSourceModule - -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas] -ModuleType=TSourceModule - -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas] -ModuleType=TSourceModule - -[C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFStringVisitor.pas] -ModuleType=TSourceModule - [EditWindow0] -ViewCount=6 +ViewCount=1 CurrentView=0 View0=0 -View1=1 -View2=2 -View3=3 -View4=4 -View5=5 PercentageSizes=1 Create=1 Visible=1 @@ -64,10 +41,10 @@ TopPanelSize=0 LeftPanelSize=0 RightPanelSize=2000 RightPanelClients=DockSite2,DockSite4 -RightPanelData=0000080001010100000009000000446F636B5369746534A21900000000000001D00700000000000001000000009723000009000000446F636B536974653201000000009723000009000000446F636B5369746534FFFFFFFF -BottomPanelSize=0 +RightPanelData=00000800010100000000261500000000000001D00700000000000001000000004312000009000000446F636B536974653201000000005C1D000009000000446F636B5369746534FFFFFFFF +BottomPanelSize=1529 BottomPanelClients=DockSite1,MessageView -BottomPanelData=0000080001020200000009000000446F636B53697465310F0000004D65737361676556696577466F726D1234000000000000022506000000000000FFFFFFFF +BottomPanelData=0000080001020100000009000000446F636B53697465313B3600000000000002F90500000000000001000000003B3600000F0000004D65737361676556696577466F726DFFFFFFFF BottomMiddlePanelSize=0 BottomMiddlePanelClients=DockSite0,GraphDrawingModel BottomMiddelPanelData=0000080001020200000009000000446F636B536974653010000000477261706844726177696E67566965779D1D00000000000002F306000000000000FFFFFFFF @@ -77,61 +54,6 @@ TabDockLeftClients=PropertyInspector=0,DockSite3=1 CustomEditViewType=TWelcomePageView WelcomePageURL=bds:/default.htm -[View1] -CustomEditViewType=TEditView -Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFChromium.pas -CursorX=32 -CursorY=1417 -TopLine=1387 -LeftCol=1 -Elisions= -Bookmarks={1,1697,1}{2,1669,12}{3,2193,3} -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\uCEFInterfaces.pas -CursorX=49 -CursorY=270 -TopLine=222 -LeftCol=1 -Elisions= -Bookmarks={1,1237,73}{2,251,39} -EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFInterfaces.pas - -[View3] -CustomEditViewType=TEditView -Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBrowser.pas -CursorX=54 -CursorY=203 -TopLine=185 -LeftCol=1 -Elisions= -Bookmarks= -EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFBrowser.pas - -[View4] -CustomEditViewType=TEditView -Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFStringVisitor.pas -CursorX=56 -CursorY=131 -TopLine=98 -LeftCol=1 -Elisions= -Bookmarks= -EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFStringVisitor.pas - -[View5] -CustomEditViewType=TEditView -Module=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas -CursorX=45 -CursorY=204 -TopLine=186 -LeftCol=1 -Elisions= -Bookmarks={1,203,1} -EditViewName=C:\Users\usuario\Documents\Embarcadero\Studio\Projects\CEF4Delphi\source\uCEFTask.pas - [UndockedDesigner] Count=0 @@ -149,11 +71,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1099 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1099 TBDockHeight=213 LRDockWidth=13602 Dockable=1 @@ -197,11 +119,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=8935 +Height=4305 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=8935 +ClientHeight=4305 TBDockHeight=5897 LRDockWidth=2352 Dockable=1 @@ -210,18 +132,18 @@ StayOnTop=0 [MessageView] PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 -Top=0 -Width=2773 -Height=1424 +Top=18 +Width=10000 +Height=1379 MaxLeft=-1 MaxTop=-1 -ClientWidth=2773 -ClientHeight=1424 -TBDockHeight=1424 +ClientWidth=10000 +ClientHeight=1379 +TBDockHeight=1379 LRDockWidth=2773 Dockable=1 StayOnTop=0 @@ -235,11 +157,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=4383 +Height=2735 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4383 +ClientHeight=2735 TBDockHeight=7152 LRDockWidth=2000 Dockable=1 @@ -289,8 +211,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-148 -Top=-132 +Left=-8 +Top=-30 Width=1844 Height=3139 MaxLeft=-1 @@ -346,15 +268,15 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=357 +Left=78 +Top=386 Width=1898 -Height=5415 +Height=7164 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=5415 -TBDockHeight=7220 +ClientHeight=7164 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -369,11 +291,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=6939 +Height=6883 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=6939 +ClientHeight=6883 TBDockHeight=5964 LRDockWidth=2508 Dockable=1 @@ -385,8 +307,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-898 -Top=-132 +Left=-946 +Top=5 Width=2844 Height=6200 MaxLeft=-1 @@ -404,8 +326,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=-1026 -Top=-132 +Left=-1152 +Top=247 Width=273 Height=359 MaxLeft=-1 @@ -429,11 +351,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1099 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1099 TBDockHeight=415 LRDockWidth=4953 Dockable=1 @@ -448,11 +370,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1099 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1099 TBDockHeight=213 LRDockWidth=7406 Dockable=1 @@ -471,11 +393,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1099 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1099 TBDockHeight=1536 LRDockWidth=3484 Dockable=1 @@ -490,11 +412,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1099 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1099 TBDockHeight=2063 LRDockWidth=3484 Dockable=1 @@ -528,11 +450,11 @@ State=0 Left=0 Top=0 Width=2336 -Height=1200 +Height=964 MaxLeft=-1 MaxTop=-1 ClientWidth=2336 -ClientHeight=1200 +ClientHeight=964 TBDockHeight=2321 LRDockWidth=2820 Dockable=1 @@ -593,11 +515,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=6939 +Height=6883 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=6939 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=7148 Dockable=1 @@ -609,8 +531,8 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=0 +Left=249 +Top=709 Width=2859 Height=3206 MaxLeft=-1 @@ -631,11 +553,11 @@ State=0 Left=0 Top=0 Width=3820 -Height=1143 +Height=1099 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1143 +ClientHeight=1099 TBDockHeight=1547 LRDockWidth=8742 Dockable=1 @@ -657,11 +579,11 @@ State=0 Left=0 Top=0 Width=1898 -Height=9215 +Height=7489 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9215 +ClientHeight=7489 TBDockHeight=3677 LRDockWidth=1898 Dockable=1 @@ -676,11 +598,11 @@ State=0 Left=0 Top=0 Width=2000 -Height=6939 +Height=6883 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=6939 +ClientHeight=6883 TBDockHeight=4888 LRDockWidth=5305 Dockable=1 @@ -741,14 +663,14 @@ Visible=0 Docked=1 State=0 Left=0 -Top=0 +Top=18 Width=3820 -Height=1424 +Height=1379 MaxLeft=-1 MaxTop=-1 ClientWidth=3820 -ClientHeight=1424 -TBDockHeight=1424 +ClientHeight=1379 +TBDockHeight=1379 LRDockWidth=3820 Dockable=1 StayOnTop=0 @@ -767,12 +689,12 @@ State=0 Left=0 Top=18 Width=2000 -Height=9215 +Height=4585 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=9215 -TBDockHeight=7220 +ClientHeight=4585 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 @@ -788,15 +710,15 @@ Create=1 Visible=0 Docked=1 State=0 -Left=0 -Top=18 +Left=1 +Top=24 Width=1898 -Height=9215 +Height=7489 MaxLeft=-1 MaxTop=-1 ClientWidth=1898 -ClientHeight=9215 -TBDockHeight=7220 +ClientHeight=7489 +TBDockHeight=7164 LRDockWidth=1898 Dockable=1 StayOnTop=0 @@ -809,18 +731,18 @@ HostDockSite=DockRightPanel DockSiteType=1 PercentageSizes=1 Create=1 -Visible=0 +Visible=1 Docked=1 State=0 Left=0 Top=449 Width=2000 -Height=4383 +Height=2735 MaxLeft=-1 MaxTop=-1 ClientWidth=2000 -ClientHeight=4383 -TBDockHeight=7220 +ClientHeight=2735 +TBDockHeight=7164 LRDockWidth=2000 Dockable=1 StayOnTop=0 diff --git a/source/CEF4Delphi.stat b/source/CEF4Delphi.stat index 75ab6417..0cb18426 100644 --- a/source/CEF4Delphi.stat +++ b/source/CEF4Delphi.stat @@ -1,9 +1,9 @@ [Stats] -EditorSecs=178278 +EditorSecs=178297 DesignerSecs=98 InspectorSecs=326 -CompileSecs=5594736 -OtherSecs=18755 +CompileSecs=5611130 +OtherSecs=18760 StartTime=22/01/2017 10:49:52 RealKeys=0 EffectiveKeys=0 diff --git a/source/uCEFApplication.pas b/source/uCEFApplication.pas index 80041bd9..0d252492 100644 --- a/source/uCEFApplication.pas +++ b/source/uCEFApplication.pas @@ -57,7 +57,7 @@ uses const CEF_SUPPORTED_VERSION_MAJOR = 3; CEF_SUPPORTED_VERSION_MINOR = 3163; - CEF_SUPPORTED_VERSION_RELEASE = 1666; + CEF_SUPPORTED_VERSION_RELEASE = 1669; CEF_SUPPORTED_VERSION_BUILD = 0; CEF_CHROMEELF_VERSION_MAJOR = 61;