19 lines
411 B
ObjectPascal
19 lines
411 B
ObjectPascal
program NtSvcExample;
|
|
|
|
{$I jcl.inc}
|
|
|
|
uses
|
|
Forms,
|
|
NtSvcDemoMain in 'NtSvcDemoMain.pas' {frmMain},
|
|
NtSvcDemoDependent in 'NtSvcDemoDependent.pas' {frmDependent},
|
|
NtSvcDemoGroups in 'NtSvcDemoGroups.pas' {frmServiceGroups};
|
|
|
|
{$R *.RES}
|
|
{$R ..\..\..\source\windows\JclCommCtrlAdmin.res}
|
|
|
|
begin
|
|
Application.Initialize;
|
|
Application.CreateForm(TfrmMain, frmMain);
|
|
Application.Run;
|
|
end.
|