求救

Question

请问在dbgrid刷新后如和将光标定位到原来那条记录上。（此时的数据集里的类容已经有所增减）
 帮我解决者，我给加分呀！！！！

Answer 1

把它的关键字值记下来
刷新后再用locate定位就可以了
只有这个办法

Answer 2

用书签, TBook.
先用GerBook给一个TBook实例赋值, 当想回到原来位置时, 调用GotoBook();

Answer 3

procedure TForm1.CopyDataClick(Sender: TObject);var
   SavePlace: TBook;
begin
   with dbgrid.datasource.dataset do
   begin
    { get a book so that we can return to the same record }
    SavePlace := GetBook;
    try
       dbgrid.refresh;
     if bookMarkValid(savePlace) then
       GotoBook(SavePlace)
     else
       first;  //delete
      { Free the book }
    finally
      FreeBook(SavePlace);
    end;
  end;end;