[ecfisa]

Hola Jose.

Un ejemplo:

Código Delphi [-]
procedure TForm1.btnRefreshClick(Sender: TObject);
var
  BM: TBookmark;
begin
  BM := ZQuery.GetBookmark;  // guardar posicion actual
  try
    // ...
    ZQuery.Close;  // cerrar
    ZQuery.Open;   // abrir
    ZQuery.GotoBookmark(BM)  // ir a la posicion guardada
  finally
    ZQuery.FreeBookmark(BM); // liberar
  end;
end;

Saludos