Thema: Delphi TService.OnStart

Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: TService.OnStart

  Alt 5. Sep 2003, 19:12
Geht. Und zwar kannst Du die Variable ErrCode setzen. Diese ist zwar nur eine Integer-Variable, aber immerhin ein Anfang. Zusätzlich kannst Du dann noch Informationen zur Fehlermeldung in das Ereignisprotokoll des Rechners eintragen.

Delphi-Quellcode:
procedure TService1.ServiceStart(Sender: TService; var Started: Boolean);
begin
  Started := False;
  ErrCode := 55;
end;
......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat