self. tab.first;
while not self. tab.eof do
begin
if self. tab.fieldbyname('cpbh').asstring= svalue then
begin
bookmark:=self. tab.getbookmark;
break;
end;
self. tab.next;
end;
self. dsr.dataset.gotobookmark(pointer(bookmark));
end;
说明：使用的表已经和当前显示界面上的dbgrid绑定；
(2) 改变颜色标记当前数据行
首先把dbgrid的defaultdrawing属性设为false;然后在ondrawdatacell事件函数中调用下面的函数：
//===============================================================
//过程名： drawline
//作者： haitian
