AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Instanz eines Objektes auf existenz Prüfen
Thema durchsuchen
Ansicht
Themen-Optionen

Instanz eines Objektes auf existenz Prüfen

Ein Thema von Skript · begonnen am 11. Jan 2004 · letzter Beitrag vom 12. Jan 2004
 
Skript

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

Instanz eines Objektes auf existenz Prüfen

  Alt 11. Jan 2004, 12:19
Hallooohoo,

Ich habe das Problem, dass ich die Instanz eines Objektes überprüfen möchte ob das Ursprungsobjekt noch existiert, bzw. den Inhalt der Pointer Adresse überprüfen ob überhaupt noch Inhalt vorhanden ist.
Aaaalso ich habe ein Objekt der Klasse TEgal:
MeinObjekt := TEgal.Create; Jetzt mache ich eine Instanz des Objektes mit einem untypisierten Pointer:
Delphi-Quellcode:
MeineInstanz: Pointer;
MeineInstanz := MeinObjekt;
Jetzt vernichte ich das Ursprungsobjekt:
FreeAndNil(MeinObjekt); Die .Free Methode sollte ja den Speicher freigeben
Und jetzt möchte ich gerne ohne Exeption-Handling anhand der Instanz überprüfen ob das Ursprungsobjekt noch vorhanden ist, so im Sinne von:
if not Assigned(TEgal(MeineInstanz)) then Exit Aber irgendwie klappt das nicht , gibt es denn eine Möglichkeit, zu überprüfen ob die Adresse der Instanz noch gültig ist, bzw. inhalt hat? Oder muss ich hier mit Typisiereten Pointern arbeiten wie:
Delphi-Quellcode:
MeineInstanz: ^TEgal;
MeineInstanz := @MeinObjekt;
FreeAndNil(MeinObjekt);
if not Assignet(MeineInstanz^) then Exit;
So, ich hoffe ich habe das jetzt so unverständlich wie möglich geschrieben

Wie macht ihr Objektinstanzen und Prüft auf derer Existenz?

Gruss & vielen Dank
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:46 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz