1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +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:
Salvador Díaz Fau
2020-02-26 13:28:29 +01:00
parent a20752eb53
commit feaeb772cb
149 changed files with 7651 additions and 929 deletions

View File

@@ -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"/>

View File

@@ -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

View File

@@ -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(