Hallo,
ich habe ein weiteres Problem, eine abstrakte Klasse ist von einem Interface abgeleitet. Jetzt prüfe ich mittels Supports(Self,ISettingsKey) , ob der Nachfahre dieser Klasse ein weiteres Interface implementiert hat. Allerdings habe ich folgendes Problem, während der Prüfung mit Supports wird anscheinend die Instanz gelöscht. Beim Debuggen sieht man schön, wie jede Eigenschaft der Instanz geleert wird.
Woran kann das liegen?
Viele Grüße,
Benjamin

Ich vermute mal, dass du Objekte und Interfaces mischst. Dann darfst du keine Referenzzählung verwenden oder musst ein bisschen tricksen.
Supports dürfte vermutlich einmal AddRef und einmal Release aufrufen. Wenn das Objekt vor dem Aufruf den Refcount 0 hatte, wird es durch das Release gelöscht.

Noch eine Beobachtung: Wenn ich das Supports im Constructor aufrufe, ist es kein Problem.
Wie kann ich die Referenzzählung umgehen?
Vielen Dank,
Benjamin

Du kannst einfach AddRef und Release überschreiben, sodass sie nichts tun. Dann brauchst du aber eigentlich auch nicht von TInterfacedObject abzuleiten.

Wegen Problemen im Constructor, ändert Delphi innerhalb dessen die Referenzzählung.

Mit AddRef sagst du, daß du eine "virtuelle" Instanz haben möchtest und mit Release gibst du diese Instanz wieder frei.
(überschreiben derer ist garnicht nötig)

Aber wie schon gesagt wurde:
Man mischt keine Objekte mit Interfaces von diesem Objekt.

Wenn Interface, dann überall
oder man weiß was man tut und beachtet/umgeht einige Dinge,
damit sowas, wie bei dir, nicht passiert,
aber dieses ist nicht unbedingt ein idealer Weg.