关于DBGRID(0分)

  • 主题发起人 主题发起人 暗夜之殇
  • 开始时间 开始时间

暗夜之殇

Unregistered / Unconfirmed
GUEST, unregistred user!
如何对DBGRID的任意一行一列着色?
如何设置DBGRID任意一行一列的FORMAT?
如何取得DBGRID任意单元格的值?
 
没人回答吗?????
 
大富翁怎么拉??
 
procedure Tinfo.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if query1.FieldByName('all').asstring>40' then
begin
dbgrid1.Canvas.Font.Color:=clred;
dbgrid1.Canvas.Brush.color:=clyellow;
end
else
begin
dbgrid1.Canvas.Font.Color:=clblue;
dbgrid1.Canvas.Brush.color:=clyellow;
end;

dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state);
end;
 
谢谢fangwy 但没解决问题哦 我的要求是任意行列 比如说我要求第3行的记录为红色
第3行第3列的格式为 0。00 取得第4行第2列的值给EDIT~
 
'要求第3行的记录为红色 ':我提供的代码能实现这个要求
'第3行第3列的格式为 0。00':没试过,但可以设置某一列的格式..
'取得第4行第2列的值给EDIT':也许可以使用DBGrid1.Columns试试,我没用过,因为DBGrid与数据库表关联,通过对表的操作可以很方便的取到第n行m列的值.
 
fangwy能加我QQ吗 66320183 向您请教下~
 
后退
顶部