Das Einfachste dürfte sein, im Onpainting-Event eines ListboxItems ein Canvas.clear aufzurufen:
Delphi-Quellcode:
procedure TForm1.ListBoxItem1Painting(Sender: TObject; Canvas: TCanvas; const ARect: TRectF);
begin
Canvas.Clear(claWhite);
end;
// Hinweis: claWhite kannst Du zuer Vereinfachung der Schreibweise verwenden, wenn Du die
Unit System.UIConsts einbindest.