Hallo,
ich habe ein Problem wenn ich einen Thread vorzeitig beenden will.
Ich lasse den Thread in einer For Schleife einige Daten in ein TStringGrid eintragen.
Dies kann bis zu 10 Sekunden dauern. Damit die Form dabei nicht einfriert habe ich ein Application.ProcessMessages drinnen.
Möchte ich nun aber nach 5s schon abrechen indem ich Terminate und WaitFor aufrufe belibt es bei WaitFor stehen. Wenn das Update des TStringGirds fertig ist kann ich ohne Probleme den Thread beenden.
Ein Versuch auf diese Art geht nicht:
Delphi-Quellcode:
if not Terminated then
Application.ProcessMessages
Das Terminated bleibt auf False und dadurch bleibt es wieder hängen.
Application.ProcessMessages gefällt mir sowieso nicht aber wie kann man ansonsten ein "angebliches" Einfrieren der Anwendung verhindern?