ein Thread der alle 60 sekunden ein Label aktualisiert....

[Ultimator]

Wenn du warten willst, und trotzdem weiterarbeiten musst, dann nimm das hier:

Delphi-Quellcode:

procedure Wait(time:word); 
var start: integer; 
begin 
start := GetTickCount; 
while GetTickCount - start <= time do 
Application.ProcessMessages; 
end;