procedure cxgrdbtblvwGrid1DBTableView1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
var
BColor, FColor: TColor;
begin
BColor := ACanvas.Canvas.Brush.Color;
FColor := ACanvas.Canvas.Font.Color;
if kbmtblQBC1.FieldByName('ZKState').AsString = '待审核' then
begin
BColor := $00B3BBEA; //clred;
FColor := clBlue;
end;
end;
“相关推荐”对你有帮助么?
-
非常没帮助
-
没帮助
-
一般
-
有帮助
-
非常有帮助
提交