1. 程式人生 > >unigui 設定單元格顏色

unigui 設定單元格顏色

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;