Dienst wird durch Leerlauf beendet

[CalganX]

Hi nochmal,
okay. Habe jetzt das Problem gefunden: der Dienst beendet sich selber. Ich nehme an, weil er meint, sich im Leerlauf zu befinden, obwohl der Thread noch weiter ackern sollte. Nehme ich das FTCPDaemon.Free; heraus gibt es keine AV mehr, sondern der Thread geht einfach so zu Ende.

Ich habe deswegen in mein OnExecute-Ereignis des Dienstes folgende Schleife rein geschrieben:

Delphi-Quellcode:

  while not Terminated do
  begin
    ServiceThread.ProcessRequests(true);
  end;

Hilft aber auch nicht.

Chris