更改 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 等事件。我确定在线帮助包含带有屏幕截图和示例的概述。
我有两个网格:
以一种形式比较两个值
当两个值不相等时,我需要更改网格中列的颜色
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 等事件。我确定在线帮助包含带有屏幕截图和示例的概述。