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' {frmMain};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TATELinkMonitor, ATELinkMonitor);
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.