更改 delphi 中 tcxgrid 列的颜色?

Change color in tcxgrid column in delphi?

我有两个网格:

以一种形式比较两个值
当两个值不相等时,我需要更改网格中列的颜色

  TotalYear:=0 ;
  while not (mTblDetail.eof) do
  begin
       TotalYear:=TotalMonth +mTblDetail.FieldByName('Target_').AsFloat;
       mTblDetail.Next;
  end;
  TotalMonth:=0;
  while not(DataSet.Eof) do
  begin
      TotalMonth:=TotalMonth+DataSet.FieldByName('Target_').AsFloat;
      DataSet.Next;
  end;


我需要比较这两个值并更改颜色

if(TotalYear<>TotalMonth) then


我试着用这个:

 DataSet.Columns[8].Color:= clRed

但是显示错误 "Not Accepted"。如何更改 Tcxgrid 列的颜色?

cxGrids 中的着色最好通过 cxStyles 完成。在表单上放置一个 TcxStyleRepository 并添加一些样式。您可以将它们分配给 View.Styles.* 属性或通过 OnGetContentStyle 等事件。我确定在线帮助包含带有屏幕截图和示例的概述。