3 Spalte einer ListView

[crasher1985]

ok das hab ich nun steh ich vor dem problem hab hier im Forum verschieden Themen zu hintergrundfarben ändern per CustomDrawSubItem gefunden. Nun möchte ich aber ein bild aus einer Imagelist wie soll ich das machen?

Delphi-Quellcode:

procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView;
  Item: TListItem; SubItem: Integer; State: TCustomDrawState;
  var DefaultDraw: Boolean);
var R: TRect;
    Text: String;
begin

if (Item.Index = 1) and (SubItem = 1) then
  begin
    //get subitems rect
    ListView1CustomDrawSubItem(Sender.Handle, Item.Index, SubItem, cdsDefault , @R);
    Sender.Canvas.Brush. :=
    Sender.Canvas.FillRect(R);
    DefaultDraw := False;
  end

end;