Moin Hitzi,
noch ein kleiner Tip:
Frage bei einem boolschen Vergleich niemals nach true oder false ab.
Beispiel:
Delphi-Quellcode:
if Assigned(tf) = false then // sollte man nicht machen
if not Assigned(tf) then // besser so
True und false sind zwar in Delphi als Konstanten definiert (true = 1, false = 0), aber es ist nicht gesagt, dass ein boolsches Funktionsergebnis sich unbedingt daran hält.
Meist wird <> 0 als true und = 0 als false angesehen.
(Ok, in diesem Beispiel ist die Wahrscheinlichkeit das es schiefgeht natürlich gering).
Für meinen Geschmack ist die zweite Variante auch lesbarer.