正在阅读：DBGrid中行的定位及着色实现DBGrid中行的定位及着色实现

  // state：当前行的显示状态；

  // zdz：当前需要移动到的行的值；

  // tab：当前DBGrid中对应的表的数据；

  // dbg：当前需要操作的DBGrid；

  //返回值： 无

  //修改记录：

  //====================

  procedurDrawLine(tab:Ttable;const Rect:Trect;Field:Tfield;state:TgridDrawState;dbg:TDBGrid)

  begin

  if (tab.fieldbyname(zdm).asstring=zdz)then

  begin

  dbg.canvas.font.color:=clred;

  dbg.canvas.brush.color:=clyellow;

  end;

  dbg.DefaultDrawDataCell(Rect,Field,State);

  end;

察看评论详细内容 我要发表评论