1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00
Files
CEF4Delphi/demos/Lazarus_Windows/CookieVisitor/CookieVisitor.lpr

33 lines
715 B
ObjectPascal

program CookieVisitor;
uses
Forms,
Interfaces,
Windows,
uCEFApplication,
uCookieVisitor in 'uCookieVisitor.pas' {CookieVisitorFrm},
uSimpleTextViewer in 'uSimpleTextViewer.pas' {SimpleTextViewerFrm};
{$IFDEF WIN32}
// CEF3 needs to set the LARGEADDRESSAWARE flag which allows 32-bit processes to use up to 3GB of RAM.
{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE}
{$ENDIF}
{$R *.res}
begin
CreateGlobalCEFApp;
if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
Application.CreateForm(TCookieVisitorFrm, CookieVisitorFrm);
Application.CreateForm(TSimpleTextViewerFrm, SimpleTextViewerFrm);
Application.Run;
end;
DestroyGlobalCEFApp;
end.