2Pascal-新时代的Pascal's Archiver
论坛
›
unigui经验区
› unigrid行颜色
admin
发表于 2015-11-8 10:53:08
unigrid行颜色
procedure TMainForm.UniDBGrid1DrawColumnCell(Sender: TObject; ACol,
ARow: Integer; Column: TUniDBGridColumn; Attribs: TUniCellAttribs);
begin
if adodataset1.FieldByName('ffenlei').AsInteger=5 then attribs.Color:=clred;;
end;
页:
[1]
查看完整版本:
unigrid行颜色