mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-04-17 06:57:13 +02:00
f764c39cc1
Remove the outdated license text. Use the main cef.inc file in all Delphi demos. Fixed issue #493.
31 lines
1.1 KiB
ObjectPascal
31 lines
1.1 KiB
ObjectPascal
program WindowsServiceBrowser;
|
|
|
|
uses
|
|
Vcl.SvcMgr,
|
|
uWindowsServiceBrowser in 'uWindowsServiceBrowser.pas' {Service1: TService},
|
|
uCEFBrowserThread in 'uCEFBrowserThread.pas',
|
|
uEncapsulatedBrowser in 'uEncapsulatedBrowser.pas';
|
|
|
|
{$R *.RES}
|
|
|
|
begin
|
|
// Windows 2003 Server requires StartServiceCtrlDispatcher to be
|
|
// called before CoRegisterClassObject, which can be called indirectly
|
|
// by Application.Initialize. TServiceApplication.DelayInitialize allows
|
|
// Application.Initialize to be called from TService.Main (after
|
|
// StartServiceCtrlDispatcher has been called).
|
|
//
|
|
// Delayed initialization of the Application object may affect
|
|
// events which then occur prior to initialization, such as
|
|
// TService.OnCreate. It is only recommended if the ServiceApplication
|
|
// registers a class object with OLE and is intended for use with
|
|
// Windows 2003 Server.
|
|
//
|
|
// Application.DelayInitialize := True;
|
|
//
|
|
if not Application.DelayInitialize or Application.Installing then
|
|
Application.Initialize;
|
|
Application.CreateForm(TService1, Service1);
|
|
Application.Run;
|
|
end.
|