Acessar o resultado do IBQuery

Delphi

17/01/2005

Srs. Como faço pra colocar em uma variável o resultado de um select como este por exemplo
 SELECT COMANDO FROM COMANDO WHERE CODIGO = 3 
, neste caso a IBQuery terá apenas 1 resultado, como acesso esse resultado, posso colocá-lo em uma variável ? e se o SELECT fosse * FROM e tivesse n resultados, como acessaria um ou todos, dá pra montar um array a partir do select ?

Obrigado desde já,

Abraços,

André Matos


Espirit

Espirit

Curtidas 0

Respostas

Vprates

Vprates

17/01/2005

vc poderia ´jogar´ o resultado num stringlist assim:

For I:=0 to (Query.recordcount - 1) do
stringlist[I].add(query.fieldbyname(´campodatabela´).asstring);

ou vc poderia jogar cada campo em uma variavel diferente tipo assim:

For I:=0 to (Query.recordcount - 1) do
Begin
stringlistNome[I].add(query.fieldbyname(´Nome´).asstring);
stringlistIdentificador[I].add(query.fieldbyname(´Identificador´).asstring);
stringlistEndereco[I].add(query.fieldbyname(´Endereco´).asstring);
end;

Vlw espero ter ajudado


GOSTEI 0
Willian

Willian

17/01/2005

Não experiência alguma com IB mas com ADO / BDE.

Tente isso, quem sabe resolve:
1) Adicione os campos (Fields Editor - Ctrl + A)
2) Aí, seu código fica assim

Sintaxe:
Variável := IBQueryCAMPO.AsTipo ;

Exemplo
Contador := IBQueryCOMANDO.AsString ;


GOSTEI 0
Willian

Willian

17/01/2005

Desculpe!

´Não experiência´ = ´Não tenho experiência´


GOSTEI 0
Espirit

Espirit

17/01/2005

Obrigado vprates e willian

para a query com o select
 ´SELECT COMANDO FROM COMANDO WHERE CODIGO = 3


Funcionou da seguinte forma atendendo minha necessidade
 qtde := IBQuery1.fieldbyname(´COMANDO´).AsVariant; 
A variável qtde declarada como string.


Abraços,

t+


GOSTEI 0
POSTAR