Wann .Free und wann .Destoy benutzen

[DelphiManiac]

Hallo,
habe eine Frage zur Benutzung des Destuktors meiner Klasse.

ich kann ja folgendes schreiben:

meinObjekt.Free; oder ich rufe den von mir erstellten Destructor

meinObjekt.Destroy; auf...

Gut meine Frage nun, was macht .Free?
Setzt free nur die Objektreferenz auf NULL?
Oder ruft Free auf den Destruktor auf?

Danke schonmal

[scrat1979]

Hallo!

hier findest Du des Rätsels Lösung

SCRaT

[mkinzler]

Nimm .Free. Hier werden verschiedene Test durchgeführt und dann .Destroy aufgerufen. man sollte .Destroy nie manuell aufrufen.

[DelphiManiac]

Danke,
war genau das was ich gesucht habe!!

Weiß jetzt auch wo mein Fehler war,.. habe in meine Klasse den Destruktor nicht überschrieben,
demzufolge wurde er auch nie aufgerufen...


Danke!

[dajuhsa]

also ist XYZ.Free das gleiche wie if XYZ <> nil then XYZ.Destroy ?

[sakura]

Zitat von dajuhsa:

also ist XYZ.Free das gleiche wie if XYZ <> nil then XYZ.Destroy ?

Momentan ja, aber das kann sich theoretisch in kommenden Delphi-Versionen ändern oder in Delphi.NET anders implementiert sein Aber nach außen bleibt einfach immer der AUfruf zu .Free

......

[mkinzler]

Ja :

Zitat von System.pas:

procedure TObject.Free;
begin
if Self <> nil then
Destroy;
end;

[sirius]

Zitat von sakura:

Momentan ja, aber das kann sich theoretisch in kommenden Delphi-Versionen ändern oder in Delphi.NET anders implementiert sein Aber nach außen bleibt einfach immer der AUfruf zu .Free

Wäre doch mal ein Ding, wenn die Free-Methode demnächst autmatisch den Zeiger auf nil setzt

[mkinzler]

Zitat:

Wäre doch mal ein Ding, wenn die Free-Methode demnächst autmatisch den Zeiger auf nil setzt

Wird wohl nicht gehen. dafür gibt es ja aber FreeAndNil()

[SirThornberry]

Zitat von mkinzler:

Zitat:

Wäre doch mal ein Ding, wenn die Free-Methode demnächst autmatisch den Zeiger auf nil setzt

Wird wohl nicht gehen. dafür gibt es ja aber FreeAndNil()

ich würde es nicht pauschalisieren. Mit Compilermagic geht einiges. Siehe Strings und deren Handling.