unidbgrid 设置 单元格颜色
2018年10月24日 11:32:41 ozhy111 阅读数：68
procedure TF_Resource2.UniDBGrid1DrawColumnCell(Sender: TObject; ACol,
ARow: Integer; Column: TUniDBGridColumn; Attribs: TUniCellAttribs);
begin
if Column.FieldName='zt' then
begin
if Column.Field.AsString='通过' then
begin
Attribs.Font.Color:=clGreen;
end;
end ;
end;
