Einzelnen Beitrag anzeigen

Skript

Registriert seit: 11. Jan 2004
20 Beiträge
 
#8

Re: Instanz eines Objektes auf existenz Prüfen

  Alt 11. Jan 2004, 18:11
Ich weiss nicht mehr wie ich mich noch ausdrücken soll

Versuch 1546

Alles was ich will ist eine Instanz auf ein Objekt, über welche ich prüfen kann, ob das Ursprungsobjekt noch existiert. Ich kann da nicht ein Instanzobjekt von der gleichen Klasse wie das Ursprungsobjekt machen, weil folgendes:
Delphi-Quellcode:
var
  MeinObjekt: TEgal;
  MeineInstanz: TEgal;

...

MeinObjekt := TEgal.Create;
MeinObjekt.Wert := 10;

MeineInstanz := MeinObjekt;

FreeAndNil(MeinObjekt);
so und wenn ich jetzt folgendes mache:
WriteLn(IntToStr(MeineInstanz.Wert)); gibt es mir trotz, dass ich das Ursprungsobjekt mit FreeAndNil vernichtet habe immer noch den Wert 10 aus, wieso? An der Speicherstelle dürften doch keine Daten mehr sein. Und das ist meine Frage: wie mache ich eine eindeutige Instanz eines Objektes, mit welcher ich Prüfen kann ob das Ursprungsobjekt noch vorhanden ist? Ich weiss auch, dass ich testen kann ob MeinObjekt = nil ist, aber ich will das Objekt ja z.B einem Formular etc. übergeben welches nach der Übergabe die Variable MeinObjekt nicht mehr bekannt ist, sondern nur noch die Instanz, welche als Objektvariable des Formulars gespeichert ist, im Sinne von:
Form.UebergabeDesObjektes(MeinObjekt); Danke, oder besser:

  Mit Zitat antworten Zitat