CEF4Delphi/demos/Lazarus_Windows/ToolBoxBrowser2/ToolBoxBrowser2.lpr
Salvador Díaz Fau 79b76d3e71 Fixed black browser in Lazarus demos
Added a manifest to all Lazarus demos for Windows
2024-05-02 12:31:19 +02:00

36 lines
586 B
ObjectPascal

program ToolBoxBrowser2;
{$MODE Delphi}
uses
{$IFDEF DELPHI16_UP}
Vcl.Forms,
WinApi.Windows,
{$ELSE}
Windows,
Forms,
LCLIntf, LCLType, LMessages, Interfaces,
{$ENDIF }
uCEFApplication,
uMainForm in 'uMainForm.pas' {MainForm};
{.$R *.res}
{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE}
{$R *.res}
begin
CreateGlobalCEFApp;
if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end;
DestroyGlobalCEFApp;
end.