2,497
社区成员
发帖
与我相关
我的任务
分享数据库是SQL SERVER，DBGRID怎样可以将如果记录的数量大于100显示红色，小于则为白色？
数据库是SQL SERVER，DBGRID怎样可以将如果记录的数量大于100显示红色，小于则为白色？
...全文
请发表友善的回复…
发表回复
chenlj 2002-05-11
- 打赏
- 举报
或者这句改成这样也成
if dbgrid1.fields[0].asinteger>100 then
if dbgrid1.fields[0].asinteger>100 then
chenlj 2002-05-11
- 打赏
- 举报
也是一样
在dbgrid的DBGrid1DrawColumnCell事件中写
begin
if dbgrid1.fields[0].value>100 then
dbgrid1.Canvas.Brush.Color:=clred; else dbgrid1.canvas.brush.color:=clwrite;
dbgrid1.defaultdrawcolumncell(rect,datacol,column,state);
end;
在dbgrid的DBGrid1DrawColumnCell事件中写
begin
if dbgrid1.fields[0].value>100 then
dbgrid1.Canvas.Brush.Color:=clred; else dbgrid1.canvas.brush.color:=clwrite;
dbgrid1.defaultdrawcolumncell(rect,datacol,column,state);
end;
lya_lya 2002-05-11
- 打赏
- 举报
哈哈，改颜色。
就是在dbgrid里的ondrawcolumncell事件里添代码：
只要是改grid的cancas对象的font或者brush的颜色。
比较容易的。
就几句代码就搞点的。
你也可以借鉴这个方法，比较相识的。
http://www.csdn.net/expert/topic/713/713625.xml?temp=5.280703E-02
就是在dbgrid里的ondrawcolumncell事件里添代码：
只要是改grid的cancas对象的font或者brush的颜色。
比较容易的。
就几句代码就搞点的。
你也可以借鉴这个方法，比较相识的。
http://www.csdn.net/expert/topic/713/713625.xml?temp=5.280703E-02
d_delphi 2002-05-11
- 打赏
- 举报
sorry,我说错了，应是记录的一个字段[数量]的值大100
chenlj 2002-05-11
- 打赏
- 举报
在dbgrid的DBGrid1DrawColumnCell事件中写
begin
if dbgrid1.DataSource.DataSet.RecordCount<10 then
dbgrid1.Canvas.Brush.Color:=clred; else...
dbgrid1.defaultdrawcolumncell(rect,datacol,column,state);
end;
begin
if dbgrid1.DataSource.DataSet.RecordCount<10 then
dbgrid1.Canvas.Brush.Color:=clred; else...
dbgrid1.defaultdrawcolumncell(rect,datacol,column,state);
end;
firetoucher 2002-05-11
- 打赏
- 举报
up
zhang21cnboy 2002-05-11
- 打赏
- 举报
If DBgrid.datasource.dataset.recordcount>100
Then
dbgrid.color:=clred
Else
dbgrid.color:=clwhite
Then
dbgrid.color:=clred
Else
dbgrid.color:=clwhite
yansea 2002-05-11
- 打赏
- 举报
用全局变量吧……如果大于100为真，否则为假，在DBGrid1DrawColumnCell写你的颜色语句……
