If DBgrid.datasource.dataset.recordcount>100 Then dbgrid.color:=clred Else dbgrid.color:=clwhite
在dbgrid的DBGrid1DrawColumnCell事件中写 begin if dbgrid1.DataSource.DataSet.RecordCount<10 then dbgrid1.Canvas.Brush.Color:=clred; else... 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;
或者这句改成这样也成 if dbgrid1.fields[0].asinteger>100 then
Then
dbgrid.color:=clred
Else
dbgrid.color:=clwhite
begin
if dbgrid1.DataSource.DataSet.RecordCount<10 then
dbgrid1.Canvas.Brush.Color:=clred; else...
dbgrid1.defaultdrawcolumncell(rect,datacol,column,state);
end;
就是在dbgrid里的ondrawcolumncell事件里添代码:
只要是改grid的cancas对象的font或者brush的颜色。
比较容易的。
就几句代码就搞点的。
你也可以借鉴这个方法,比较相识的。
http://www.csdn.net/expert/topic/713/713625.xml?temp=5.280703E-02
在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;
if dbgrid1.fields[0].asinteger>100 then