CEF4Delphi/demos/Lazarus_any_OS/ExternalPumpBrowser/ExternalPumpBrowser.lpr

47 lines
1.1 KiB
ObjectPascal
Raw Normal View History

(*
* Include the following files
2021-02-18 16:01:32 +01:00
* ExternalPumpBrowser.app/Contents/Frameworks/ExternalPumpBrowser Helper.app/
* files from the demos/Lazarus_Mac/AppHelper project
* use create_mac_helper.sh
*
2021-02-18 16:01:32 +01:00
* ExternalPumpBrowser.app/Contents/Frameworks/Chromium Embedded Framework.framework
* files from Release folder in cef download
*
*)
2021-02-18 16:01:32 +01:00
program ExternalPumpBrowser;
{$mode objfpc}{$H+}
{$IFDEF MSWINDOWS}{$I ..\..\..\source\cef.inc}{$ELSE}{$I ../../../source/cef.inc}{$ENDIF}
2018-07-22 11:12:41 +02:00
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
{$IFDEF LINUX}
InitSubProcess, // On Linux this unit must be used *before* the "interfaces" unit.
{$ENDIF}
Interfaces,
Forms,
uExternalPumpBrowser, GlobalCefApplication
{ you can add units after this }
;
2018-07-22 11:12:41 +02:00
{$R *.res}
2021-02-19 02:38:43 +01:00
{$IFDEF WIN32}
// CEF needs to set the LARGEADDRESSAWARE ($20) flag which allows 32-bit processes to use up to 3GB of RAM.
{$SetPEFlags $20}
{$ENDIF}
2018-07-22 11:12:41 +02:00
begin
RequireDerivedFormResource:=True;
2021-02-17 21:28:19 +01:00
Application.Title := 'External Pump Browser';
Application.Scaled := True;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
2018-07-22 11:12:41 +02:00
end.