ListBox Items Brush zweifarbig?

[a.def]

Zitat:

Und was steht in diesem Code?

Na, das habe ich doch durch deine Zeile ersetzt

Zitat von Uwe Raabe:

Setz doch mal folgenden Code hinter das TextOut:

Delphi-Quellcode:

 if odSelected in State then
  begin
   aLBCanvas.Brush.Color := aListBoxBrushSelectedColor2; // die Farbe des rechten Streifens
   {* ==> *} aLBCanvas.FillRect(Rect.SplitRect(srRight, 5)); // 5 Pixel am rechten Rand   
  end;