我从昨天到今天都没有一个大虾来帮我,只有加分了。谁能把此问题解决了俺200分都送他了。问题请参见03-31 09: 52 的帖子。

解决方案 »

  1.   

    DELPHI7下通过procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
      Field: TField; State: TGridDrawState);
    begin
      //   ondrawdatacell 事件
      //    (Sender as  TDBGrid).DataSource.DataSet.RecNo   这行可得到这个grid的 ADOTable1 的当前行。     if Field.AsString='1'  then      //如果当前字段内容为1,画为红背景色  ,也可用上面得到的行做为条件。
         begin
           (Sender as  TDBGrid).Canvas.Brush.Color:=clred;
           (Sender as  TDBGrid).DefaultDrawDataCell(Rect, Field, State);
         end;end;
      

  2.   

    不是DBgrid而是DBCTRLGRID假设用一个DBctrlgrid连接到一个数据集上,在它的上面放置一个DBEDIT控件,和数据集某个字段连接,大家知道程序运行起来,DBGRID控件将在上面根据记录的多少动态创建DBEIDT,将数据依次排列其中,但是我想根据记录的值作为判断条件,指定某个DBEDIT中的字体颜色,就是因为它是动态创建的,所以我也不知道让程序如何找到对应的DBEDIT,我在属性中设置颜色,全都变了,我就是要找到某个动态创建的DBEDIT,然后单独它的字体赋上颜色,怎么办?我折腾了半天,还不行。
      

  3.   

    是DBctrlgrid控件,上面的DBGRID应该纠正为dbctrlgrid