|
// sValue：当前需要移动到的行的值； // tab：当前DBGrid中对应的表的数据； // dsr：当前需要操作的数据源； //返回值： 无 //修改记录： //================== Procedure DyDbgDataLine(sValue:string;tab:Ttable;dsr:TDatasource) var bookmark:TBookMark; begin //记录当前标记的行； bookmark:=self. tab.GetBookmark; self. tab.first; while not self. tab.Eof do begin if self. tab.FieldByName('cpbh').AsString= sValue then begin bookmark:=self. tab.GetBookmark; break;
|
鏀惰棌鎴愬姛鏌ョ湅鏀惰棌>>
正在阅读：DBGrid中行的定位及着色实现DBGrid中行的定位及着色实现
2004-02-25 10:07
出处：CSDN
责任编辑：linjixiong
键盘也能翻页，试试“← →”键
