TListView, in 1. Spalte Rechteck in bestimmter Farbe

[hoika]

Hallo,

danke, ich habe mich leider nicht genau ausgedrückt.
Die Farbe der Spalte soll natürlich in Abhängigkeit des
jeweiligen ListItems gefärbt werden.

Jetzt habe ich folgende Situation.

Delphi-Quellcode:

procedure TForm.LV_DataAdvancedCustomDraw(
  Sender: TCustomListView; const ARect: TRect; Stage: TCustomDrawStage;
  var DefaultDraw: Boolean);

ARect ist da, aber kein Item

Delphi-Quellcode:

procedure TForm.LV_DataAdvancedCustomDrawItem(
  Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;
  Stage: TCustomDrawStage; var DefaultDraw: Boolean);

Item ist da, aber kein Rect, Item.DisplayRect (drLabel) bringt auch nichts.

Da muss ich wohl wirklich auf VST umsteigen,
Mann, Mann, Mann ;(


Heiko