Mantener la misma vista en un DBGrid

[rgstuamigo]

Se puede hacer de 2 maneras.
Primera:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var p:TBookmark;
begin
   try
    ClientDataSet1.DisableControls;
      p:=ClientDataSet1.GetBookmark;// creo un puntero apuntando al registro actual del DataSet
         //Hago lo que sea con el clientDataset
         //Me muevo para adelante o para atras, etc.
      ClientDataSet1.GotoBookmark(p);//hago volver al registro donde estaba antes
   finally
      ClientDataSet1.FreeBookmark(p);//libero el objeto p
     ClientDataSet1.EnableControls;
   end;
end;

Segunda:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var Fila_Actual:Integer;
begin
    Fila_Actual:=ClientDataSet1.RecNo;
    ClientDataSet1.DisableControls;
         //Hago lo que sea con el clientDataset
         //Me muevo para adelante o para atras, etc.
    ClientDataSet1.RecNo:=Fila_Actual;//vuelvo al registro donde estaba inicialmente 
    ClientDataSet1.EnableControls;
end;

Saludos...