Usando DbGrid e TibQuery

Delphi

19/01/2004

Como faço para direcionar (foco) para uma determinada linha em uma dbgrid que está vinculada a uma TibQuery?

Situação:
Quando eu modifico um dado em uma linha aplico o COMMIT e depois reabro a TibQuery. Todavia ele coloca o foco na primeira linha. Quero que ele vá para a linha onde eu modifiquei o dado.

OBRIGADO


Jonnymarques

Jonnymarques

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

19/01/2004

colega,
vc precisa armazenar a posição anterior do cursor antes de fechar a query e após reabri-la reposionar...
acredito que isso resolva o problema:
 procedure TForm1.Button1Click(Sender: TObject);
var reg_sel: TBookmarkStr;
begin
 { bookmark no registro selecionado}
 reg_sel:= ibquery1.Bookmark;
 { fecho e reabro a query }
 ibquery1.close;
 ibquery1.Open;
 { retorno ao registro selecionado no bookmark}
 ibquery1.Bookmark:= reg_sel;
 { opcional : focar a dbgrid após o retorno }
 dbgrid1.setfocus;
end;


espero ter ajudado...


GOSTEI 0
POSTAR