pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-12 22:07:39 +02:00
Code Issues Actions Releases Activity

Fixes for ExternalPumpBrowser

Browse Source
This commit is contained in:
martin 2021-02-17 21:28:19 +01:00
parent 2353308ef2
commit 55f5eec85c
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
demos/Lazarus_any_OS/ExternalPumpBrowser/ExternalPumpBrowser.lpr
View File

@ -69,7 +69,8 @@ uses
begin begin
RequireDerivedFormResource:=True; RequireDerivedFormResource:=True;
Application.Scaled:=True; Application.Title := 'External Pump Browser';
Application.Scaled := True;
Application.Initialize; Application.Initialize;
Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm1, Form1);
Application.Run; Application.Run;

4
demos/Lazarus_any_OS/ExternalPumpBrowser/uExternalPumpBrowser.pas
View File

@ -276,8 +276,10 @@ end;
initialization initialization
if GlobalCEFApp = nil then begin if GlobalCEFApp = nil then begin
CreateGlobalCEFApp; CreateGlobalCEFApp;
if not GlobalCEFApp.StartMainProcess then if not GlobalCEFApp.StartMainProcess then begin
DestroyGlobalCEFApp;
halt(0); // exit the subprocess halt(0); // exit the subprocess
end;
end; end;
finalization finalization