Change the font color of a specific row in a TListView (Views: 27)
Problem/Question/Abstract: How to change the font color of a specific row in a TListView Answer: Use the events OnCustomDrawItem and OnCustomDrawSubItem: procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView; Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean); begin if (Item.Index mod 2) = 0 then Sender.Canvas.Font.Color := clRed else Sender.Canvas.Font.Color := clBlack; end; |