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 CEF3.2924.1575

Browse Source 
MiniBrowser : Addition of a preferences form, replacement of URLEdt by
URLCbx, addition of a custom scheme
TCEFApplication : Addition of 3 new properties : EnableSpellingService,
EnableMediaStream, EnableSpeechInput
TCEFChromium : Renamed internal procedures, addition of
UppdatePreferences and SavePreferences procedures, more checks in
doOnBeforeClose and doOnClose.
TCefChromiumWindow : WebBrowser_OnClose returns False by default
This commit is contained in:
Salvador Diaz Fau
2017-03-15 14:53:45 +01:00
parent b35837585c
commit 6178ab49a5
29 changed files with 1223 additions and 451 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
source/uCEFChromiumWindow.pas
View File

@@ -117,8 +117,13 @@ end;
procedure TChromiumWindow.WebBrowser_OnClose(Sender: TObject; const browser: ICefBrowser; out Result: Boolean);
begin
PostMessage(self.Handle, CEF_DOONCLOSE, 0, 0);
Result := True;
if assigned(FOnClose) then
begin
PostMessage(self.Handle, CEF_DOONCLOSE, 0, 0);
Result := True;
end
else
Result := False;
end;
procedure TChromiumWindow.OnCloseMsg(var aMessage : TMessage);