[Lazarus-es] posicionar fila en grid en determinado registro

José Antonio Cuello josea en artextrading.com
Lun Abr 26 14:44:06 CEST 2010


hola te envio el procedimiento que uso para refrescar los datos de un
grid, espero te sirva. Un saludo.

P.D: DBGrid1 = nombre de tu grid ( esto es por si refresca el Dataset
del grid )

procedure TMantForm.RefreshQry( Sender: TDataSet );
Var
  vBookMark: String;
  vActGrid : Boolean;
begin
  if Sender.Active then
    vBookMark := Sender.Bookmark
  else
    vBookMark := '';

  vActGrid := (Sender = DBGrid1.DataSource.DataSet);
  try
    if vActGrid then DBGrid1.BeginUpdate;
    Sender.Close;
    Sender.Open;
  finally
    if vActGrid then DBGrid1.EndUpdate(true);
  end;

  if vBookMark <> '' then
    try
      Sender.Bookmark := vBookMark;
    except
    end;
end;


El sáb, 24-04-2010 a las 11:46 -0300, Paola Bruccoleri escribió:
> Hola a todos..
> tengo un grid asociado a un tzquery.
> Supongamos que me posiciono en un registro cualquiera, y agrego unos 
> datos a otra tabla. Esos datos están relacionados con los del grid. 
> Obviamente necesito actualizar el grid para ver el cambio en un 
> importe.
> Cuando hago el refresh, me queda seleccionado el primer registro del 
> grid, y no donde yo estaba.
> 
> ¿Cómo puedo hacer para quedarme en ese registro? colocando algún 
> bookmark?
> muchas gracias a todos...
> chauuuuuuuuuu
> 
> 
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es






More information about the Lazarus-es mailing list