Warum nicht so?
TSkinListBox = class(TListBox, ISkinListBox);
In der Klasse TComponent sind die Methoden _AddRef, _Release und QueryInterface schon implementiert.
Deshalb kann man Komponenten und Controls als Basisklasse verwenden und damit weitere Interfaces implementieren.
Weil es eine
Nonvcl ListBox mit OwnerDraw ist.
gruss