Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Actualizar datos con TQuery sin mover dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=63439)

odrack 13-02-2009 19:32:49

Actualizar datos con TQuery sin mover dbgrid
 
Un saludo a todos en el foro!

Tengo un dilema que por mas que he buscado en el foro no hayo, que seguramente no he de estar buscando bien, el problema es el siguiente:

Tengo una aplicación donde hago devoluciones de tickets, esto funciona bien, el problema es cuando vuelvo a cargar los datos del ticket ya que no puedo regresar al dato donde me quede en el dbgrid y tengo que hacer nuevamente el recorrido manual para identificar el renglon. Para cargar los datos nuevamente lo hago con un query de la siguente forma

Código Delphi [-]
            query1.Close;
            query1.SQL.Clear;
            query1.SQL.Text:=('select * from ticket where serie='+quotedstr(edit1.text)+' and indticket='+quotedstr(edit2.text));
            query1.ExecSQL;
            query1.Open;


¿Como puedo cargar nuevamente los datos sin la necesidad de reabrir la tabla para que siga en el mismo lugar donde hice la actualización en mi dbgrid?

Gracias de antemando!!!:D

roman 13-02-2009 19:47:36

Puedes usar bookmarks. Algo como:

Código Delphi [-]
var
  Bookmark: TBookmarkStr;

begin
  // Guardas la posición actual
  Bookmark := query1.Bookmark;

  {
    recargas el query
  }

  // Regresas a la posición anterior
  Query.Bookmark := Bookmark;
end;

Por cierto, las consultas SELECT debes hacerlas con Open sólamente, no con ExecSQL.

// Saludos

odrack 13-02-2009 19:53:03

Muchas Gracias roman!!

Funciona perfactamente, no sabia para que era la funcion bookmark.

Saludos!!:D


La franja horaria es GMT +2. Ahora son las 02:13:29.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi