Einzelnen Beitrag anzeigen

Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.027 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#8

Re: wie installierten Dienst starten?

  Alt 19. Okt 2004, 16:00
- Richtig!
- Wenn du einen neuen Dienst erstellst hast du doch dieses Formular, da kannst du deinen Timer reinpacken...
- Das automatische Starten und Stoppen müsste so gehen:
Delphi-Quellcode:
procedure TService1.ServiceAfterInstall(Sender: TService);
begin
  DoStart;
end;

procedure TService1.ServiceBeforeUninstall(Sender: TService);
begin
  if not DoStop then
    raise Exception.Create('Dienst konnte nicht beendet werden!');
end;
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat