DBLookupListBox und Style (DrawItem)

[Whistler]

Moin,

ich sehe gerade, dass die "DBLookUpListBox" Komponente von Haus aus kein OnDrawItem Ereignis hat, wie z.B. die "TListBox".
Ich würde aber gerne das aussehen der Listbox bzw. wie selektierte Einträge aussehen, einstellen...

Kennt jmd. eine Komponente die DBLookUp und OnDrawItem vereint oder eine andere Lösung?