1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-02 21:57:37 +02:00

33 lines
818 B
ObjectPascal
Raw Normal View History

program JSSimpleExtension;
{$MODE Delphi}
{$I ..\..\..\..\source\cef.inc}
uses
Forms,
Windows,
Interfaces,
uCEFApplication,
uJSSimpleExtension in 'uJSSimpleExtension.pas' {JSSimpleExtensionFrm};
// CEF needs to set the LARGEADDRESSAWARE ($20) flag which allows 32-bit processes to use up to 3GB of RAM.
{$IFDEF WIN32}{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE}{$ENDIF}
{$R *.res}
begin
// GlobalCEFApp creation and initialization moved to a different unit to fix the memory leak described in the bug #89
// https://github.com/salvadordf/CEF4Delphi/issues/89
CreateGlobalCEFApp;
if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
Application.CreateForm(TJSSimpleExtensionFrm, JSSimpleExtensionFrm);
Application.Run;
end;
DestroyGlobalCEFApp;
end.