2Pascal-新时代的Pascal

 找回密码
 立即注册
搜索
热搜: fastreport
查看: 1925|回复: 0
打印 上一主题 下一主题

unigrid行颜色

[复制链接]

29

主题

73

帖子

727

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
727
跳转到指定楼层
楼主
发表于 2015-11-8 10:53:08 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
京东数码购物支持本站
procedure TMainForm.UniDBGrid1DrawColumnCell(Sender: TObject; ACol,
  ARow: Integer; Column: TUniDBGridColumn; Attribs: TUniCellAttribs);
begin
  if adodataset1.FieldByName('ffenlei').AsInteger=5 then attribs.Color:=clred;;

end;
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|新时代Pascal论坛

GMT+8, 2024-12-22 01:23 , Processed in 0.053330 second(s), 24 queries .

Powered by Discuz! X3

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表