Sinngemäß:
Delphi-Quellcode:
ThreadExecute;
while not Terminated then
begin
// mach was
Sleep(50000);
end;
Delphi-Quellcode:
procedure Form1.FormClose;
begin
Thread.Terminate;
Thread.Waitfor;
Thread.Free; // wo auch immer.
end;
Frage: Wie lange dauert das Beenden?
PS: Wir sprechen nicht über Abwürgen sondern definiert Beenden.