Registriert seit: 10. Sep 2004
Ort: Dülmen
464 Beiträge
Delphi 7 Professional
|
Re: Systemdienst stresst CPU
16. Feb 2007, 12:30
Delphi-Quellcode:
procedure TService1.ServiceExecute(Sender: TService);
begin
while not Terminated do
begin
Sleep(100);
ServiceThread.ProcessRequests(False);
end;
end;
Bau ein "Sleep()" ein.
Stefan "Geht nicht!" ist keine Fehlerbeschreibung und "Hab ich schon versucht!" keine Antwort!
Hey, it compiles! Ship it!
|