Eine ganz andere Frage:
destructor Destroy; reintroduce;
Die wurde hier im Hause auch schon diskutiert. Der, der diese Klassen definiert hat, meint es sei nötig.
Ich wette er liegt falsch.
Destroy wird von TObject.Free aufgerufen und ist
virtual. Mit
reintroduce wird der Aufruf des neu definierten Destruktors verhindert.