TThread und kein Ende in Sicht...

[Alter Mann]

Moin,

habe den Denkfehler gefunden:

Zitat:

Delphi-Quellcode:

Delphi-Quellcode:

procedure TForm1.TerminateEvent(Sender : TObject);
begin
  CT.Free;
  Log('TerminateEvent');
end;

Das CT.Free; ist hier Falsch, da der Thread sich ja schon beenden will. Ein erneuter Aufruf verhindert aber die Beendigung, sodass es zu einer Schleife kommt. Anfängerfehler.
Danke an allen für die Hilfe und Entschuldigung.

[TiGü]

Jup, stand schon in Beitrag #4.

[Alter Mann]

Aber nicht warum= super