CEF4Delphi/demos/Delphi_VCL/DLLBrowser/CEF4DelphiLoader.dpr

21 lines
477 B
ObjectPascal
Raw Normal View History

program CEF4DelphiLoader;
uses
Vcl.Forms,
uCEF4DelphiLoader in 'uCEF4DelphiLoader.pas' {Form1};
{$R *.res}
const
IMAGE_FILE_LARGE_ADDRESS_AWARE = $0020;
// 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}
begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.