//过程名： dydbgdataline
//作者： haitian
//日期： 2003-02-22
//功能： 根据用户指定的条件自动移动到dbgrid控件中符合此条件的某行数据上
//输入参数：
// svalue：当前需要移动到的行的值；
// tab：当前dbgrid中对应的表的数据；
// dsr：当前需要操作的数据源；
//返回值： 无
//修改记录：
//================================================================
procedure dydbgdataline(svalue:string;tab:ttable;dsr:tdatasource)
var
bookmark:tbookmark;
begin
//记录当前标记的行；
bookmark:=self. tab.getbookmark;
