Einzelnen Beitrag anzeigen

IngoD7

Registriert seit: 16. Feb 2004
464 Beiträge
 
Delphi 7 Enterprise
 
#26

Re: unsichtbare Klassen

  Alt 19. Feb 2007, 20:26
@JasonDX

Zitat von JasonDX:
Wenn eine Variable als TMeineKlasse deklariert ist, macht es keinen Unterschied.
Doch. Bei Benutzung von Free macht es immer einen Unterschied. Es gibt in der Regel nur das eine, geerbte Free in TObject. Das wird auch angesprungen wenn ein TMeineKlasse.Free aufgerufen wird. Und dieses angesprungenen TObject.Free würde jetzt nur den eigenen Destructor (in TObject) aufrufen, wenn der Destructor der abgeleiteten Klasse TMeineKlasse kein override besitzt. Und das eben auch bei
Delphi-Quellcode:
var
  x: TMeineKlasse;
Dieser "Umweg" über das Free, welches nur im Urahnen TObject existiert, macht beim Aufruf des Destructors den kleinen Unterschied.
  Mit Zitat antworten Zitat