eigenen Pointer unterbringen in TObject?

[stoxx]

@ Sirius

es gänge darum, Funktionalität zu einem beliebigen Object hinzuzufügen. Eine Art Mehrfachvererbung zu realisieren.
Mehrfachvererbung bräuchte man ja meist nur zur Erweiterung von Objectfunktionalitäten.
Reine Funktionerweiterungen lassen sich mit dem Class Helpern super realisieren, wenn man jetzt aber noch eigene Daten unterbringen möchte, müsste man wirklich eine zweite Tabelle führen.

bräuchte es für dies hier ...

http://www.delphipraxis.net/internal...148&highlight=

@Apollonius


wie geht das mit dem Hooken von TObject.FreeInstance. Code hast Du nicht zufällig gleich parat, oder?