CEF4Delphi/demos/Delphi_VCL/ConsoleBrowser2/ConsoleBrowser2_sp.dpr

31 lines
923 B
ObjectPascal
Raw Normal View History

program ConsoleBrowser2_sp;
uses
uCEFApplicationCore;
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
GlobalCEFApp := TCefApplicationCore.Create;
GlobalCEFApp.WindowlessRenderingEnabled := True;
GlobalCEFApp.ShowMessageDlg := False;
GlobalCEFApp.BlinkSettings := 'hideScrollbars';
{
// In case you use a custom directory for the CEF binaries you have to set these properties
// here and in the main process
GlobalCEFApp.FrameworkDirPath := 'c:\cef';
GlobalCEFApp.ResourcesDirPath := 'c:\cef';
GlobalCEFApp.LocalesDirPath := 'c:\cef\locales';
GlobalCEFApp.SetCurrentDir := True;
}
GlobalCEFApp.StartSubProcess;
DestroyGlobalCEFApp;
end.