Timer ohne Timer

[busybyte]

Schätze du musst anschliessend dann auch die System-Messages ausführen lassen, da die im thread nicht abgearbeitet werden
versuch mal

Delphi-Quellcode:

if t mod 1000=0 then 
begin
...
Application.Processmessages;
end;