求救
请问在dbgrid刷新后如和将光标定位到原来那条记录上。（此时的数据集里的类容已经有所增减）
帮我解决者，我给加分呀！！！！
问题点数：0、回复次数：4Top
1 楼huojiehai（海天子）回复于 2003-08-01 21:34:40 得分 0
把它的关键字值记下来
刷新后再用locate定位就可以了
只有这个办法Top
2 楼zousoft（菜菜鸟的战斗诗歌）回复于 2003-08-01 23:38:28 得分 0
用书签, TBookmark.
先用GerBookmark给一个TBookmark实例赋值, 当想回到原来位置时, 调用GotoBookmark();Top
3 楼madyak（无天）回复于 2003-08-02 01:18:54 得分 0
如果原来的那条记录被删除了,怎么办?Top
4 楼older（井底蛙同样可以向往大海）回复于 2003-08-02 01:54:23 得分 0
procedure TForm1.CopyDataClick(Sender: TObject);
var
SavePlace: TBookmark;
begin
with dbgrid.datasource.dataset do
begin
{ get a bookmark so that we can return to the same record }
SavePlace := GetBookmark;
try
dbgrid.refresh;
if bookMarkValid(savePlace) then
GotoBookmark(SavePlace)
else
first; //delete
{ Free the bookmark }
finally
FreeBookmark(SavePlace);
end;
end;
end;Top
