Colorear filas de un ListView

[[cHackAll]]

void __fastcall TForm1::ListView1CustomDrawSubItem(TCustomListView *Sender,
      TListItem *Item, int SubItem, TCustomDrawState State,
      bool &DefaultDraw)
{
 if (SubItem == 1)
  { Sender->Canvas->Brush->Color = 0x669966; }
 else if (SubItem == 2)
  { Sender->Canvas->Brush->Color = 0xffcc33; }
 else if (SubItem == 3)
  { Sender->Canvas->Brush->Color = 0x0066ff; }
 DefaultDraw = 1;
}