Einzelnen Beitrag anzeigen

IngoD7

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

Re: unsichtbare Klassen

  Alt 19. Feb 2007, 20:51
Moin Hansa,

das ist ungefähr das, was JasonDX meinte. Der direkte Aufruf von Destroy in deinem Beispiel verhält sich so, wie du sagst. Was anderes hatte JasonDX auch nicht behauptet.

Jetzt gibt es aber Fälle, wo (jetzt bezogen auf dein Beispiel) nicht
var MeineKlasse : TMeineKlasse; sondern
var MeineKlasse : TObject; gesetzt wird, und dennoch wie folgt created wird:
MeineKlasse := TMeineKlasse.Create; Jetzt erreicht dein Code den Destructor von TMeineKlasse nicht mehr.

Zitat von Hansa:
Das TObject-Free von Jason ist auch gemogelt, es geht um Destroy. Free hat eingebaute Funktionalität. Das ist schon was anderes.
Aber genau das ist gemeint!
Wer ruft denn bitteschön Destroy direkt auf? Für dein Beispiel war es jetzt ja ganz gut und schön und anschaulich. Aber in der Praxis sollte und wird die Methode Free oder die Procedure FreeAndNil() benutzt. Und genau dann ist override in jedem Fall erforderlich.
  Mit Zitat antworten Zitat