You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-06-12 22:07:39 +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:
@ -22,15 +22,15 @@
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<IsVisibleTab Value="True"/>
|
||||
<EditorIndex Value="1"/>
|
||||
<TopLine Value="235"/>
|
||||
<CursorPos X="51" Y="233"/>
|
||||
<TopLine Value="253"/>
|
||||
<CursorPos X="45" Y="271"/>
|
||||
<UsageCount Value="20"/>
|
||||
<Loaded Value="True"/>
|
||||
<LoadedDesigner Value="True"/>
|
||||
<DefaultSyntaxHighlighter Value="Delphi"/>
|
||||
</Unit1>
|
||||
</Units>
|
||||
<JumpHistory Count="11" HistoryIndex="10">
|
||||
<JumpHistory Count="13" HistoryIndex="12">
|
||||
<Position1>
|
||||
<Filename Value="JSDialogBrowser.lpr"/>
|
||||
</Position1>
|
||||
@ -74,6 +74,14 @@
|
||||
<Filename Value="uJSDialogBrowser.pas"/>
|
||||
<Caret Line="93" Column="59" TopLine="82"/>
|
||||
</Position11>
|
||||
<Position12>
|
||||
<Filename Value="uJSDialogBrowser.pas"/>
|
||||
<Caret Line="233" Column="51" TopLine="234"/>
|
||||
</Position12>
|
||||
<Position13>
|
||||
<Filename Value="uJSDialogBrowser.pas"/>
|
||||
<Caret Line="232" Column="51" TopLine="232"/>
|
||||
</Position13>
|
||||
</JumpHistory>
|
||||
<RunParams>
|
||||
<FormatVersion Value="2"/>
|
||||
|
@ -15,7 +15,7 @@ object JSDialogBrowserFrm: TJSDialogBrowserFrm
|
||||
OnDestroy = FormDestroy
|
||||
OnShow = FormShow
|
||||
Position = poScreenCenter
|
||||
LCLVersion = '2.0.4.0'
|
||||
LCLVersion = '2.0.6.0'
|
||||
object ChromiumWindow1: TChromiumWindow
|
||||
Left = 0
|
||||
Height = 603
|
||||
@ -65,9 +65,4 @@ object JSDialogBrowserFrm: TJSDialogBrowserFrm
|
||||
left = 56
|
||||
top = 88
|
||||
end
|
||||
object CEFSentinel1: TCEFSentinel
|
||||
OnClose = CEFSentinel1Close
|
||||
left = 128
|
||||
top = 88
|
||||
end
|
||||
end
|
||||
|
@ -60,7 +60,6 @@ type
|
||||
{ TJSDialogBrowserFrm }
|
||||
|
||||
TJSDialogBrowserFrm = class(TForm)
|
||||
CEFSentinel1: TCEFSentinel;
|
||||
ChromiumWindow1: TChromiumWindow;
|
||||
AddressPnl: TPanel;
|
||||
AddressEdt: TEdit;
|
||||
@ -259,13 +258,18 @@ end;
|
||||
|
||||
procedure TJSDialogBrowserFrm.ChromiumWindow1BeforeClose(Sender: TObject);
|
||||
begin
|
||||
CEFSentinel1.Start;
|
||||
FCanClose := True;
|
||||
PostMessage(Handle, WM_CLOSE, 0, 0);
|
||||
end;
|
||||
|
||||
procedure TJSDialogBrowserFrm.ChromiumWindow1Close(Sender: TObject);
|
||||
begin
|
||||
// DestroyChildWindow will destroy the child window created by CEF at the top of the Z order.
|
||||
if not(ChromiumWindow1.DestroyChildWindow) then CEFSentinel1.Start;
|
||||
if not(ChromiumWindow1.DestroyChildWindow) then
|
||||
begin
|
||||
FCanClose := True;
|
||||
PostMessage(Handle, WM_CLOSE, 0, 0);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TJSDialogBrowserFrm.Chromium_OnBeforePopup(Sender: TObject;
|
||||
|
Reference in New Issue
Block a user