Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ObjectList und referenzierte Objekte (https://www.delphipraxis.net/150711-objectlist-und-referenzierte-objekte.html)

webcss 24. Apr 2010 19:05


ObjectList und referenzierte Objekte
 
Hallo zusammen,

vielleicht kann mir jemand auf die Sprünge helfen :gruebel:

Ich habe eine Objectlist mit Objekten. Nennen wir diese Master. Sie ist der Besitzer der Objekte(=OwnsObjects:= true)

Nun habe ich eine oder mehrere ObjectLists, welche Referenzen auf die Objekte von Master halten, dies aber nicht besitzen (=OwnsObjects:=false)

Wenn ich jetzt in der Masterliste ein Objekt lösche, halten die Referenzlisten immernoch einen Zeiger auf das gelöschte Objekt.
Wie kann ich den Referenzlisten klarmachen, dass ein Element gelöscht wurde, und diese dann ebenfalls dieses Element entfernen?

Gruß

Clemens

himitsu 24. Apr 2010 19:12

Re: ObjectList und referenzierte Objekte
 
Du mußt vor dem Löschen aus Master
dieses Objekt in den anderen Listen suchen und dort ebenfalls löschen.


Alternativ könntest du in Master eine Liste der Referenzlisten führen (die Referenzlisten müssen also beim Master angemeldet werden.
Dazu überschreibst du noch RemoveItem und Clear (und eventuell noch Andere, wo auch entfernt wird)
und bevor via Inherited das Objekt gelöscht wird, wird die Liste der Referenzlisten durchgegangen und überall das Objekt rausgelöscht, wenn es da vorhanden ist.

webcss 24. Apr 2010 19:19

Re: ObjectList und referenzierte Objekte
 
Danke, so dachte ich es mir auch. Ich werde dann wohl meine grauen Zellen bemühen mal sehen wie das elegant verpacke.
Bisher hatte ich das ala TCollection, so das ein Object sich selber aus der jeweiligen Liste entfernt, aber damit gab's dann Probleme mit "Schweizer Käse" Speicher... werde dennoch auch darüber nochmal nachdenken.

himitsu 24. Apr 2010 19:53

Re: ObjectList und referenzierte Objekte
 
Bei TCollection kann man ja auch nur einen Owner angeben und somit kann sich das nur aus einer Liste selber rauslöschen.

Im Prinzip gibt es zwei grundsätzliche Lösungen:

- Master kennt alle anderen Listen
(wird was aus Master gelöscht, so wendet er sich an die anderen Listen und läßt auch da löschen)

- jedes Objekt kennt alle Listen in denen es drinsteht.
(wird es im Master gelöscht, dann wendet sich der Master an das Objekt und dieses löscht sich aus den anderen Listen)


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:12 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