TCustomDaemonApplication

type TCustomDaemonApplication = class(TCustomApplication)

protected

  procedure SysStartUnInstallDaemons;

  procedure SysEndUnInstallDaemons;

  procedure SysStartInstallDaemons;

  procedure SysEndInstallDaemons;

  procedure SysStartRunDaemons;

  procedure SysEndRunDaemons;

  procedure CreateDaemonController(); virtual;

  procedure CreateServiceMapper(); virtual;

  procedure CreateDaemonInstance(); virtual;

  procedure RemoveController(); virtual;

  function GetEventLog; virtual;

  procedure DoRun; override;

  procedure DoLog(); override;

  property SysData: TObject; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure ShowException(); override;

  function CreateDaemon();

  procedure StopDaemons();

  procedure InstallDaemons;

  procedure RunDaemons;

  procedure UnInstallDaemons;

  procedure ShowHelp; virtual;

  procedure CreateForm(); virtual;

  property OnRun: TNotifyEvent; [rw]

  property EventLog: TEventLog; [r]

  property GUIMainLoop: TGuiLoopEvent; [rw]

  property GuiHandle: THandle; [rw]

  property RunMode: TDaemonRunMode; [r]

  property AutoRegisterMessageFile: Boolean; [rw]

end;

TCustomDaemonApplication

TObject