Série da semana: Primeiros passos no Angular

Veja mais

Como selecionar mais de um dado no access para inserir no StringGrid ao mesmo tempo?

14/03/2019

7

Olá pessoal,

Estou trabalhando em um código utilizando ADOQuery1 para conexão com o banco de dados access e o Delphi.

Atualmente, o banco de dados contém uma planilha com dois campos:

COD_PROC - Texto curto
COD_INPUT - Texto curto
COD_DETALHE - Numeração automática (chave primária).

Gostaria de saber como eu faço para selecionar a informação do COD_INPUT e salvar no StringGrid, considerando que o COD_PROC tem o mesmo nome e apenas o COD_INPUT tem nomes diferentes.

No caso, estou querendo selecionar todos os COD_INPUT onde o COD_PROC = P1. Aí todo linha que COD_PROC for igual a P1 ele vai selecionar o COD_INPUT do access e adicionar em um stringGrid.

Obrigado pela atenção.
Responder

Posts

14/03/2019

Augusto

Correção:

Atualmente, o banco de dados contém uma planilha com TRÊS campos:

COD_PROC - Texto curto
COD_INPUT - Texto curto
COD_DETALHE - Numeração automática (chave primária).
Responder
Olá Augusto

O que você deseja é algo relativamente simples:

coloque o seguinte SQL no ADOQuery1: select * from tabela where COD_PROC = 'P1';


depois você abre a consulta e faz um while para adicionar os dados na StringGrid:


  ADOQuery1.Open;

  StringGrid1.RowCount:=ADOQuery1.RecordCount;
  StringGrid1.ColCount:=3; //porque tem tres colunas a tabela pelo que eu entendi;

  while not ADOQuery1.Eof do
  begin
    StringGrid1.Rows[ADOQuery1.RecNo].Add('COD_PROC');
    StringGrid1.Rows[ADOQuery1.RecNo].Add('COD_INPUT');
    StringGrid1.Rows[ADOQuery1.RecNo].Add('COD_DETALHE');
    ADOQuery1.Next;
  end;



Espero ter ajudado. Um forte abraço e fique com Deus.
Responder