1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-04-17 06:57:13 +02:00

40 lines
1.1 KiB
ObjectPascal
Raw Normal View History

2017-01-27 17:59:15 +01:00
program SubProcess;
{$MODE Delphi}
{$I ..\..\..\source\cef.inc}
2017-07-02 13:17:47 +02:00
2017-01-27 17:59:15 +01:00
uses
LCLIntf, LCLType, LMessages, Forms, Interfaces,
uCEFApplicationCore;
2017-01-27 17:59:15 +01:00
// CEF3 needs to set the LARGEADDRESSAWARE flag which allows 32-bit processes
// to use up to 3GB of RAM.
{$SetPEFlags $20}
2017-07-02 13:17:47 +02:00
2017-01-27 17:59:15 +01:00
begin
GlobalCEFApp := TCefApplicationCore.Create;
2017-07-02 13:17:47 +02:00
// The main process and the subprocess *MUST* have the same GlobalCEFApp
// properties and events, specially FrameworkDirPath, ResourcesDirPath,
// LocalesDirPath, cache and UserDataPath paths.
2017-11-09 10:33:20 +01:00
// The demos are compiled into the BIN directory. Make sure SubProcess.exe
// and SimpleBrowser.exe are in that directory or this demo won't work.
2017-11-09 10:33:20 +01:00
// In case you want to use custom directories for the CEF3 binaries, cache
// and user data.
2017-07-02 13:17:47 +02:00
{
GlobalCEFApp.FrameworkDirPath := 'cef';
GlobalCEFApp.ResourcesDirPath := 'cef';
GlobalCEFApp.LocalesDirPath := 'cef\locales';
GlobalCEFApp.cache := 'cef\cache';
GlobalCEFApp.UserDataPath := 'cef\User Data';
}
2017-01-27 17:59:15 +01:00
GlobalCEFApp.StartSubProcess;
GlobalCEFApp.Free;
GlobalCEFApp := nil;
2017-01-27 17:59:15 +01:00
end.