TlistView 控件单个子项颜色和字体

[baody8]

不是单行哦，是单项的一个值的字体和颜色

[baody8]

高人在哪儿，自己顶顶

[lyhoo163]

在OnDrawSubItem中重新绘制一下Item颜色

procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView;
          Item: TListItem; SubItem: Integer; State: TCustomDrawState;var DefaultDraw: Boolean);
begin
  inherited;
  with ListView1.Canvas.Brush do
  begin
    if (Item.Index=5) and (SubItem=2) 
      then Color := clYellow
      else Color := clWhite 
  end;
end;

大致如此。

[lyhoo163]

这是选择ITem行列值，你还可以设置ITem的值范围，作为条件。