Einzelnen Beitrag anzeigen

Benutzerbild von Sunlight7
Sunlight7

Registriert seit: 17. Sep 2006
Ort: Sonnensystem, Zentral
1.522 Beiträge
 
Delphi 5 Standard
 
#14

Thread startet aber macht gleich fertig

  Alt 12. Okt 2006, 10:21
Der Fehler liegt wo anders...

Das kann nicht funktionieren weil...
Delphi-Quellcode:
procedure TCheckForNewInPostkorbThread.Execute;
begin
  CheckForNew;
  Liste.Free;
  // ... Du da raus fliegst
end;
So geht's:
Delphi-Quellcode:
procedure TCheckForNewInPostkorbThread.Execute;
begin
  While not Terminated do begin
     CheckForNew;
     Sleep(1000); // Verschnaufpause, damit der Thread nicht mit 100% CPU läuft.
     // Da fliegst Du nicht mehr raus
  end;

  Liste.Free;
end;
Windows: Ja - Microsoft: Nein -> www.ReactOS.org
  Mit Zitat antworten Zitat