program SubProcess; {$I ..\..\..\source\cef.inc} 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; // The main process and the subprocess *MUST* have the same GlobalCEFApp // properties and events, specially FrameworkDirPath, ResourcesDirPath, // LocalesDirPath, cache and UserDataPath paths. // The demos are compiled into the BIN directory. Make sure ToolBoxSubProcessBrowser_sp.exe // and ToolBoxSubProcessBrowser.exe are in that directory or this demo won't work. // In case you want to use custom directories for the CEF binaries, cache // and user data. { GlobalCEFApp.FrameworkDirPath := 'cef'; GlobalCEFApp.ResourcesDirPath := 'cef'; GlobalCEFApp.LocalesDirPath := 'cef\locales'; GlobalCEFApp.cache := 'cef\cache'; GlobalCEFApp.UserDataPath := 'cef\User Data'; } GlobalCEFApp.StartSubProcess; GlobalCEFApp.Free; GlobalCEFApp := nil; end.