end;
self. tab.Next;
end;
self. dsr.DataSet.GotoBookmark(pointer(bookmark));
End;
说明:使用的表已经和当前显示界面上的DBGrid绑定;
(2) 改变颜色标记当前数据行
首先把DBGrid的DefaultDrawing属性设为false;然后在OnDrawDataCell事件函数中调用下面的函数:
//=========================
//过程名: DrawLine
//作者: haitian
//日期: 2003-02-22
//功能: 把Dbgrid中的指定的行改变颜色作为标记;
//输入参数:
// zdm:字段名;
// Rect:需要出入的行的某个单元;
// Field:当前显示的域;
察看评论详细内容 我要发表评论
|