Bookmark
 

Uso TcxGrid de la dev. En codigo tengo un while y necesito, que quando yo hago clique en mi grid, la quey entra en el while, pero despues necesito que ella volva para la posicion anterior y no para el primer o ultimo registro. Como hago eso?

Ahi te va un ejemplo:

Código Delphi [-]
var
  bmRec: TBookMark;
begin
  with Archivo do
  begin
    DisableControls;
    bmRec := GetBookmark;
    First;
    try
      while not EOF do
      begin
        // hacer algo aqui
        Next;
      end;
    finally
      GotoBookmark(bmRec);
      FreeBookmark(bmRec);
      EnableControls;
    end;
  end;
end;

EnabledControls y DisableControls es para evitar que el usuario note que se esta recorriendo el dataset.

Saludos

mi precipitei en postar un mensaje. Ya esta listo. Yo estaba usando el evento erado del TcxGrid. Ahora esta ok, hizo asi:
var
bm: Tbookmark;
begin
bm := CDS.GetBookmark;
Mis procedures aqui;
CDS.GotoBookmark(bm);
CDS.FreeBokmark(bm);
....

Que bueno que lo solucionaste. No te olvides del EnableControls y DisableControls, pues si son muchos registros o el proceso es complicado, no se ve muy bien que la pantalla este actualizandose....al menos a mi no me gusta.

Saludos.

Si, yo havia olvidado del EnableControl pero luego hizo la corecion y esta listo. gracias!!!!

Hola jcarteagaf y paulao, además de no verse bien, se hace mas lento el programa.

Saluditos