Item en couleur dans un ListView

Bonjours à tous !
je me demandais si était possible de mettre un seul item en couleur dans un ListView.
Voilà mon bout de code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

for(int i= 1;i<CompteurItem;i++) { TListItem *Item =MaListe->ListView1->Items->Add(); Item->Caption=ListeItem->Strings[i]; if(strcmp(ListeItem->Strings[i].c_str(),"tomate")==0) { AnsiString Index ="Item trouvé - ligne : "; Index =Index +i; MaListe->StatusBar1->Panels->Items[1]->Text =Index;   //Mettre l'item trouvé en rouge   }

---

Voici un petit bout de code permettant de colorer une ligne sur deux dans un TListView. Il suffit de compléter l'évènement OnCustomDrawItem (en laissant OwnerDraw à false)

Code:

---

1 2 3 4 5 6 7 8

void __fastcall TForm1::ListView1CustomDrawItem(TCustomListView *Sender, TListItem *Item, TCustomDrawState State, bool &DefaultDraw) { if( (Item->Index%2)) //on colorie les élément pairs ((TListView*)Sender)->Canvas->Brush->Color = clYellow ; else ((TListView*)Sender)->Canvas->Brush->Color = clWhite ; }

---

La même chose pour colorer une cellule:

Code:

---

1 2 3 4 5 6 7 8

void __fastcall TForm1::ListView1CustomDrawItem(TCustomListView *Sender, TListItem *Item, TCustomDrawState State, bool &DefaultDraw) { if( (Item->Caption == "tomate" )) ((TListView*)Sender)->Canvas->Brush->Color = clRed ; else ((TListView*)Sender)->Canvas->Brush->Color = clWhite ; }

---

merci, simple et efficace !