Hi,
bei mir ist die Methode so implementiert und es gibt 0% Auslastung solange auf einem
TCP Port für den Dienst nichts hereinkommt (er quasi im Leerlauf ist).
Delphi-Quellcode:
procedure TPTSService.ServiceExecute(Sender: TService);
begin
// main schleife
while not Terminated do
begin
ServiceThread.ProcessRequests(True);
end;
end;
Gruß,
Christoph