You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-06-22 22:17:48 +02:00
Update to CEF 80.0.4
- Added GlobalCEFApp.DisableNewBrowserInfoTimeout property - Removed remaining TCEFSentinel from all the demos. - Fixed mouse coordinates in FMX demos with OSR browsers before sending a mouse wheel event.
This commit is contained in:
README.md
demos
Delphi_FMX
Delphi_VCL
ConsoleBrowser
FullScreenBrowser
JavaScript
CustomTitleBar
JSDialog
JSExecutingFunctions
JSExtensionWithFunction
JSExtensionWithObjectParameter
JSExtensionWithObjectParameter.dprojuJSExtensionWithObjectParameter.dfmuJSExtensionWithObjectParameter.pas
JSSimpleExtension
JSSimpleWindowBinding
JSWindowBindingWithArrayBuffer
JSWindowBindingWithFunction
JSWindowBindingWithObject
KioskOSRBrowser
MDIExternalPumpBrowser
OSRExternalPumpBrowser
PopupBrowser
PopupBrowser2
SimpleExternalPumpBrowser
SimpleOSRBrowser
SimpleServer
ToolBoxBrowser
Lazarus
DOMVisitor
EditorBrowser
ExternalPumpBrowser
FullScreenBrowser
JavaScript
JSDialog
JSEval
JSExecutingFunctions
JSExtension
JSExtensionWithFunction
JSExtensionWithObjectParameter
JSExtensionWithObjectParameter.lpsuJSExtensionWithObjectParameter.lfmuJSExtensionWithObjectParameter.pas
JSSimpleExtension
JSSimpleWindowBinding
JSWindowBindingSubProcess
JSWindowBindingWithArrayBuffer
JSWindowBindingWithArrayBuffer.lpsuJSWindowBindingWithArrayBuffer.lfmuJSWindowBindingWithArrayBuffer.pas
JSWindowBindingWithFunction
JSWindowBindingWithObject
OSRExternalPumpBrowser
PopupBrowser
PopupBrowser2
PostInspectorBrowser
SchemeRegistrationBrowser
SimpleBrowser
SimpleBrowser2
SimpleExternalPumpBrowser
SimpleOSRBrowser
SimpleServer
SubProcess
TabbedBrowser
TabbedBrowser2
ToolBoxBrowser
URLRequest
packages
source
update_CEF4Delphi.json@ -20,9 +20,10 @@
|
||||
<ComponentName Value="JSWindowBindingWithObjectFrm"/>
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<IsVisibleTab Value="True"/>
|
||||
<EditorIndex Value="1"/>
|
||||
<TopLine Value="120"/>
|
||||
<CursorPos X="82" Y="126"/>
|
||||
<TopLine Value="158"/>
|
||||
<CursorPos Y="181"/>
|
||||
<UsageCount Value="20"/>
|
||||
<Loaded Value="True"/>
|
||||
<LoadedDesigner Value="True"/>
|
||||
@ -31,7 +32,6 @@
|
||||
<Unit2>
|
||||
<Filename Value="uMyV8Accessor.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<IsVisibleTab Value="True"/>
|
||||
<EditorIndex Value="2"/>
|
||||
<TopLine Value="34"/>
|
||||
<CursorPos X="5" Y="90"/>
|
||||
@ -40,7 +40,7 @@
|
||||
<DefaultSyntaxHighlighter Value="Delphi"/>
|
||||
</Unit2>
|
||||
</Units>
|
||||
<JumpHistory Count="7" HistoryIndex="6">
|
||||
<JumpHistory Count="10" HistoryIndex="9">
|
||||
<Position1>
|
||||
<Filename Value="uJSWindowBindingWithObject.pas"/>
|
||||
</Position1>
|
||||
@ -68,6 +68,18 @@
|
||||
<Filename Value="uJSWindowBindingWithObject.pas"/>
|
||||
<Caret Line="146" TopLine="131"/>
|
||||
</Position7>
|
||||
<Position8>
|
||||
<Filename Value="uJSWindowBindingWithObject.pas"/>
|
||||
<Caret Line="126" Column="82" TopLine="120"/>
|
||||
</Position8>
|
||||
<Position9>
|
||||
<Filename Value="uJSWindowBindingWithObject.pas"/>
|
||||
<Caret Line="125" Column="82" TopLine="119"/>
|
||||
</Position9>
|
||||
<Position10>
|
||||
<Filename Value="uJSWindowBindingWithObject.pas"/>
|
||||
<Caret Line="124" Column="72" TopLine="104"/>
|
||||
</Position10>
|
||||
</JumpHistory>
|
||||
<RunParams>
|
||||
<FormatVersion Value="2"/>
|
||||
|
@ -1,7 +1,7 @@
|
||||
object JSWindowBindingWithObjectFrm: TJSWindowBindingWithObjectFrm
|
||||
Left = 106
|
||||
Left = 434
|
||||
Height = 589
|
||||
Top = 133
|
||||
Top = 137
|
||||
Width = 978
|
||||
Caption = 'Initializing browser. Please wait...'
|
||||
ClientHeight = 589
|
||||
@ -14,7 +14,7 @@ object JSWindowBindingWithObjectFrm: TJSWindowBindingWithObjectFrm
|
||||
OnCreate = FormCreate
|
||||
OnShow = FormShow
|
||||
Position = poScreenCenter
|
||||
LCLVersion = '2.0.4.0'
|
||||
LCLVersion = '2.0.6.0'
|
||||
object NavControlPnl: TPanel
|
||||
Left = 0
|
||||
Height = 21
|
||||
@ -69,9 +69,4 @@ object JSWindowBindingWithObjectFrm: TJSWindowBindingWithObjectFrm
|
||||
left = 32
|
||||
top = 288
|
||||
end
|
||||
object CEFSentinel1: TCEFSentinel
|
||||
OnClose = CEFSentinel1Close
|
||||
left = 32
|
||||
top = 360
|
||||
end
|
||||
end
|
||||
|
@ -59,7 +59,6 @@ type
|
||||
{ TJSWindowBindingWithObjectFrm }
|
||||
|
||||
TJSWindowBindingWithObjectFrm = class(TForm)
|
||||
CEFSentinel1: TCEFSentinel;
|
||||
NavControlPnl: TPanel;
|
||||
Edit1: TEdit;
|
||||
GoBtn: TButton;
|
||||
@ -122,8 +121,7 @@ uses
|
||||
// =================
|
||||
// 1. FormCloseQuery sets CanClose to FALSE calls TChromium.CloseBrowser which triggers the TChromium.OnClose event.
|
||||
// 2. TChromium.OnClose sends a CEFBROWSER_DESTROY message to destroy CEFWindowParent1 in the main thread, which triggers the TChromium.OnBeforeClose event.
|
||||
// 3. TChromium.OnBeforeClose calls TCEFSentinel.Start, which will trigger TCEFSentinel.OnClose when the renderer processes are closed.
|
||||
// 4. TCEFSentinel.OnClose sets FCanClose := True and sends WM_CLOSE to the form.
|
||||
// 3. TChromium.OnBeforeClose sets FCanClose := True and sends WM_CLOSE to the form.
|
||||
|
||||
procedure GlobalCEFApp_OnContextCreated(const browser: ICefBrowser; const frame: ICefFrame; const context: ICefv8Context);
|
||||
var
|
||||
@ -180,8 +178,7 @@ end;
|
||||
|
||||
procedure TJSWindowBindingWithObjectFrm.CEFSentinel1Close(Sender: TObject);
|
||||
begin
|
||||
FCanClose := True;
|
||||
PostMessage(Handle, WM_CLOSE, 0, 0);
|
||||
|
||||
end;
|
||||
|
||||
procedure TJSWindowBindingWithObjectFrm.WMMove(var aMessage : TWMMove);
|
||||
@ -230,7 +227,8 @@ end;
|
||||
procedure TJSWindowBindingWithObjectFrm.Chromium1BeforeClose(
|
||||
Sender: TObject; const browser: ICefBrowser);
|
||||
begin
|
||||
CEFSentinel1.Start;
|
||||
FCanClose := True;
|
||||
PostMessage(Handle, WM_CLOSE, 0, 0);
|
||||
end;
|
||||
|
||||
procedure TJSWindowBindingWithObjectFrm.Chromium1Close(
|
||||
|
Reference in New Issue
Block a user