Einzelnen Beitrag anzeigen

tigerman33

Registriert seit: 30. Jul 2005
Ort: München
423 Beiträge
 
Delphi 2005 Professional
 
#1

InterfacedObject freigeben

  Alt 24. Nov 2005, 12:39
Hallo,

Ich habe Objekte, welche mittels eines Interfaces bestimmte Vorkomnisse an die sie beinhaltende Liste senden.

Im Konstruktor der Liste (das natürlich dieses Interface implementiert) habe ich den Referenzzähler manuell um eins erhöht (damit wenn das letzte Listenelement freigegeben wird nicht automatisch auch die Liste freigegeben wird).
Nun habe ich die Methode BeforeDestruction überschrieben und dort diese eine "zusätzliche" Referenz wieder entfernt, um die Liste ohne Exception freigeben zu können.

Beim _Releasen dieser Referenz wird aber natürlich jetzt wieder der Destruktor aufgerufen, mit allen dazugehörigen Folgen (u.a. auch Aufruf von BeforeDestruction, erneutes _Release etc). Das halte ich für ziemlich unschön. Auf Anhieb sind mir dazu zwei Lösungswege eingefallen:

1. Setzen eines zusätzlichen Boolean-Feldes auf true und dann Abfrage im BeforeDestruction ob nicht gerade schon freigegeben wird (quasi wie das csDestroying von Komponenten)
2. Re-implementieren der _Release-Methode von TInterfacedObject, um damit die "Auto-Zerstörung" bei Referenzzähler=0 zu unterbinden.

Sind aber beides nicht so richtig "schöne" Lösungen, finde ich. Hat noch jemand eine bessere Idee?

Mfg
Christian
Christian
Der Computer hilft mir, Probleme zu lösen, die ich ohne Computer nicht hätte.
  Mit Zitat antworten Zitat