Einzelnen Beitrag anzeigen

lucius

Registriert seit: 6. Okt 2005
Ort: Niederlande
215 Beiträge
 
Delphi 7 Enterprise
 
#1

Listview bestimte Zeilen faerben

  Alt 13. Okt 2005, 11:46
Hallo zusammen ich habe ne Listview mit 3 Spalten, in der 2e Spalte stehen die Werte VCD, SVCD und DVD.
Jetzt moechte ich das jede Zeile wo DVD drin steht rot markiert wird.
Habe auch schon was code:
Delphi-Quellcode:
procedure TForm.ListViewCustomDrawSubItem(Sender: TCustomListView;
          Item: TListItem; State: TCustomDrawState; var DefaultDraw: boolean);
begin
    if (Item.SubItems[1]='DVD') then
    Sender.Canvas.Brush.Color:=clRed;
end;
Aber irgendwie kriege ich das mit dem Aufruf nicht hin:
Delphi-Quellcode:
if Item.SubItems[1]='DVDthen
  ListViewCustomDrawSubItem(listview, ????, ????, FALSE);
Was kommt jetzt genau bei den Fragezeichen und stimmt der code ueberhaupt?
Danke im voraus.
  Mit Zitat antworten Zitat