backgroundservice.~dpr

来自「a service application sample wrote with 」· ~DPR 代码 · 共 16 行

program BackGroundService;

uses
  SvcMgr,
  unit_Service in 'unit_Service.pas' {ATELinkMonitor: TService},
  unit_frmMain in 'unit_frmMain.pas' {Form2};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TATELinkMonitor, ATELinkMonitor);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.