Listview Hintergrundbild verdeckt Items

[Geda]

Moin,

Ich verwende neuerdings XE8.
Eigentlich dachte ich, ein Hintergrundbild in einen ListView einzufügen, wäre einfach - ist es auch, aber dafür verschwinden immer mal wieder die Item.Captions.
Sollte nach meiner Kenntnis bei ListViewCustomDraw eigentlich nicht passieren ...
Der Effekt tritt auf, wenn ich die Maus über die Items bewege.
Um das ganze zu vereinfachen, habe ich jetzt nur den Hintergrund eingefärbt (ich weiß, DAS geht auch einfacher ...) und den Listview manuell über die IDE mit ein paar Items bestückt.

procedure TFormBase.ListViewCustomDraw(Sender: TCustomListView;

const ARect: TRect; var DefaultDraw: Boolean);

begin

ListView.Canvas.FillRect(ListView.ClientRect);

end;

Die properties des ListView stehen außer ViewStyle = vsReport auf den Default-Werten.

Hat Jemand eine Idee?

Danke und Gruß,

Geert