pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00
Code Issues Actions Releases Activity

Update to CEF 92.0.21

Browse Source 
Added GlobalCEFApp.DisablePopupBlocking
Added GlobalCEFApp.DisableBackForwardCache
Fixed issue #372
TCefApplicationCore code reorganization
This commit is contained in:
Salvador Díaz Fau
2021-07-31 17:24:54 +02:00
parent 8d789edbdf
commit c4135dedd5
9 changed files with 175 additions and 160 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
demos/Delphi_VCL/DOMVisitor/uDOMVisitor.pas
View File

@@ -459,7 +459,6 @@ end;
procedure CreateGlobalCEFApp;
begin
GlobalCEFApp := TCefApplication.Create;
GlobalCEFApp.RemoteDebuggingPort := 9000;
GlobalCEFApp.OnProcessMessageReceived := GlobalCEFApp_OnProcessMessageReceived;
// Enabling the debug log file for then DOM visitor demo.
@@ -582,7 +581,8 @@ begin
PostMessage(Handle, MINIBROWSER_COPYFRAMEIDS_2, 0, 0);
MINIBROWSER_CONTEXTMENU_SETINPUTVALUE_JS :
frame.ExecuteJavaScript('document.getElementById("' + NODE_ID + '").value = "qwerty";', 'about:blank', 0);
if (frame <> nil) and frame.IsValid then
frame.ExecuteJavaScript('document.getElementById("' + NODE_ID + '").value = "qwerty";', 'about:blank', 0);
MINIBROWSER_CONTEXTMENU_SETINPUTVALUE_DT :
// https://chromedevtools.github.io/devtools-protocol/tot/DOM/#method-getDocument

2
demos/Delphi_VCL/TinyBrowser2/TinyBrowser2.dproj
View File

@@ -6,7 +6,7 @@
<MainSource>TinyBrowser2.dpr</MainSource>
<Base>True</Base>
<Config Condition="'$(Config)'==''">Debug</Config>
<Platform Condition="'$(Platform)'==''">Win64</Platform>
<Platform Condition="'$(Platform)'==''">Win32</Platform>
<TargetedPlatforms>3</TargetedPlatforms>
<AppType>Application</AppType>
</PropertyGroup>

1
demos/Delphi_VCL/TinyBrowser2/uTinyBrowser2.pas
View File

@@ -111,6 +111,7 @@ begin
GlobalCEFApp.ExternalMessagePump := False;
GlobalCEFApp.ChromeRuntime := True; // Enable this line to enable the "ChromeRuntime" mode. It's in experimental state.
GlobalCEFApp.cache := 'cache';
GlobalCEFApp.DisablePopupBlocking := True;
GlobalCEFApp.OnContextInitialized := GlobalCEFApp_OnContextInitialized;
GlobalCEFApp.OnGetDefaultClient := GlobalCEFApp_OnGetDefaultClient; // This event is only used in "ChromeRuntime" mode