Fórum Pegar numa query apenas os registros selecionados no DBGRID? #471569

28/02/2014

0

Saudações.

Atualmente eu consigo pegar na query os valores de (um) registro selecionado no DBGRIG.
Minha rotina permite que possa ser selecionado um ou vários registros, e nesse caso, quando seleciono mais de um registro, eu não sei como pegar esses valores e atribuir aos meus objetos (array, record, variáveis, etc...)

Creio que a solução seja fazendo um loop na query mas, não sei se existe uma propriedade que me permita varrer a query e identificar apenas esses registros selecionados a partir do DBGRID.

OBS: Utilizo Delphi 7 + DBGridExpress (mas posso utilizar o DBGRID normal, caso haja solução).

Agradeço a todos antecipadamente.
Luciano Bastos

Luciano Bastos

Responder

Posts

28/02/2014

Luciano Bastos

Saudações.

Problema resolvido com o bloco de código abaixo:

//dgxMovimento é o meu DBGrid

for Ix := 0 to dgxMovimento.SelectedRows.Count -1 do
 begin
   dgxMovimento.DataSource.DataSet.Bookmark := dgxMovimento.SelectedRows[Ix];
   Movimento   := QryMoviment.FieldByName('NuMovimento').AsString;
   NossoNumero := QryMoviment.FieldByName('NossoNumero').AsString;
 end;


Tópico resolvido!
Responder

Gostei + 0

29/09/2014

Jose Raimundo

Amigo boa noite onde coloco esta linha de código em algum evento especifico do dbgrid?
Responder

Gostei + 0

29/09/2014

Jose Raimundo

Saudações.

Problema resolvido com o bloco de código abaixo:

//dgxMovimento é o meu DBGrid

for Ix := 0 to dgxMovimento.SelectedRows.Count -1 do
 begin
   dgxMovimento.DataSource.DataSet.Bookmark := dgxMovimento.SelectedRows[Ix];
   Movimento   := QryMoviment.FieldByName('NuMovimento').AsString;
   NossoNumero := QryMoviment.FieldByName('NossoNumero').AsString;
 end;


Tópico resolvido!
Responder

Gostei + 0

29/09/2014

Jose Raimundo

Saudações.

Problema resolvido com o bloco de código abaixo:

//dgxMovimento é o meu DBGrid

for Ix := 0 to dgxMovimento.SelectedRows.Count -1 do
 begin
   dgxMovimento.DataSource.DataSet.Bookmark := dgxMovimento.SelectedRows[Ix];
   Movimento   := QryMoviment.FieldByName('NuMovimento').AsString;
   NossoNumero := QryMoviment.FieldByName('NossoNumero').AsString;
 end;


Tópico resolvido!


Amigo boa noite onde coloco esta linha de código em algum evento especifico do dbgrid?
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar