Thema: Delphi "Unsterbliche" Klassen

Einzelnen Beitrag anzeigen

Dax
(Gast)

n/a Beiträge
 
#42

Re: "Unsterbliche" Klassen

  Alt 15. Dez 2005, 15:43
Zitat von MaBuSE:
Dann kann ich selbst ausprobieren, ob TObject(Klasse).Free; funktioniert.
Ich füchte das wird nix Free ruft Destroy auf, Destroy ruft FreeInstance auf, und FreeInstance ist nun mal virtuell und damit nur über patchen wieder auf TObject zurückbiegbar.

Edit: So, killen wir die Klasse mal.FreeMem(Pointer(Unverwundbar), Unverwundbar.InstanceSize);
  Mit Zitat antworten Zitat