Abgeleitetes TListitem zufügen

[tigerman33]

Hi,

was meinst du mit das Pferd von hinten aufzäumen? Also meine Daten liegen nicht direkt im Listitem, sondern in einer Extra-Klasse, die über ein Interface mit diversen Beobachtern, u.a. auch dem Listitem kommunizieren soll:

Delphi-Quellcode:

type TObservantLVItem = class(TListItem, ITaskObserver)
     protected
       function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
       function _AddRef: integer; stdcall;
       function _Release: integer; stdcall;
     public
       procedure TaskActed(Task: TTask; AnAction: TTaskAction);
       procedure TaskPropertyChanged(Task: TTask; AProp: TTaskProperty);
     end;

Aber wie du sagst, wird das ja wohl nicht funktionieren.
Zum virtuellen Listview habe ich in der OH nichts gefunden, kann mich aber erinnern das schon mal irgendwo gesehen zu haben (Alzheimer schlägt wieder zu) Hat jemand einen Tipp, nach welchen Stichwörtern ich da suchen muss?