TThread, irgendwas mache ich falsch

[himitsu]

Delphi-Quellcode:

Sleep(5);
  until WaitForSingleObject(MyThread.Handle, 5)

Ein paar Dinge verstehen könntest du dennoch lernen

Sleep(5)_ohneEventbehandlung + WaitFor(5)_mitEventbehandlung = WaitFor(10)_undAllesMitEventbehandlung

Oder noch besser das WaitFor nicht nur auf dein Event, sondern auch auf die Warteschlange des VCL-Threads warten lassen.
> Delay etwas anpassen