如何在DBGrid中,让指定的CELL格显示指定的背景色,字体,文字颜色? 如何在DBGrid中,让指定的CELL格显示指定的背景色,字体,文字颜色? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用onDrawDataCell事件,如下:procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);begin if Field.Text='2' then DBGrid1.Canvas.brush.Color := clred; DBGrid1.DefaultDrawDataCell(rect,field,state);end;哥们,分有点少啊 procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);begin if (form1.Table1.RecNo=1) and (datacol=2) then begin form1.DBGrid1.Canvas.Brush.Color:=clred; form1.DBGrid1.Canvas.Font.Size:=10; form1.DBGrid1.Canvas.Font.Name:='楷体'; form1.DBGrid1.Canvas.Font.Color:=clblue; end; form1.DBGrid1.Canvas.Pen.Mode:=pmmask; form1.DBGrid1.DefaultDrawColumnCell(rect,datacol,column,state);end; 呵呵, 来晚了同意楼上俩位说的 !~~~但是存在 这样一个问题,请俩位指点如果我需要在一个dbgrid中让不同的记录显示不同的记录怎么做 ?谢谢!~~~ 如何实现主菜单栏跟标题栏在同一行 请问怎样用钩子替换其他窗口的消息处理过程呀!?? combobox问题 怎样检测Query是否为空? 如何把网页(连同图片、FALSH文件)编成EXE文件,并且无法分解。 200分请教一个Delphi中如何定位错误代码的问题。 在报表中统计问题? 问一下,如何向数据库中存入JPG格式的图片??? 简单?MS SQLSERVER 2000中用户自定义函数中的Execute问题!(含问题代码) 还是那个问题!!!高手请进!! 高分求助文本倒入数据库,,急急急急!! 谁作过医院管理系统,解决一个致命问题
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
if Field.Text='2' then
DBGrid1.Canvas.brush.Color := clred;
DBGrid1.DefaultDrawDataCell(rect,field,state);
end;
哥们,分有点少啊
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if (form1.Table1.RecNo=1) and (datacol=2) then
begin
form1.DBGrid1.Canvas.Brush.Color:=clred;
form1.DBGrid1.Canvas.Font.Size:=10;
form1.DBGrid1.Canvas.Font.Name:='楷体';
form1.DBGrid1.Canvas.Font.Color:=clblue;
end;
form1.DBGrid1.Canvas.Pen.Mode:=pmmask;
form1.DBGrid1.DefaultDrawColumnCell(rect,datacol,column,state);
end;
同意楼上俩位说的 !~~~
但是存在 这样一个问题,请俩位指点
如果我需要在一个dbgrid中让不同的记录显示不同的记录
怎么做 ?
谢谢!~~~