Conteudo da Variável no SQL da Query. Como?

Delphi

09/05/2003

Estou capturando o conteudo do campo de uma tabela e colocando numa variável e preciso colocar esta variável no conjunto da cláusula sql mas não está dando.

var cod :integer;
begin
cod :=tabela1.fieldbyname(´codigo´).asinteger;
query1.sql.close;
query1.sql.add(´select *from clientes where (codigo=´´´cod´´´);
query1.open;

não aparece nada.


Tecnicman

Tecnicman

Curtidas 0

Respostas

Aborges

Aborges

09/05/2003

Ola, exprimenta fazer assim

Supondo que cod é do tipo string

Se o Campo Código da tabela for um inteiro fazes

query1.sql.close;
query1.sql.add(´select *from clientes where codigo=´ + cod);
query1.open;

se o Campo Código da tabela for do tipo string fazes

query1.sql.close;
query1.sql.add(´select *from clientes where codigo=´´ + cod +´´´);
query1.open;

Caso a variàvel cod não seja um string deves converte-la para string
usando, por exemplo, uma das funções

inttostr(cod)
vartostr(cod)

Espero que funcione


GOSTEI 0
Tecnicman

Tecnicman

09/05/2003

Experimentei por o código em outro evento e funcionou.
de qualquer maneira agradeço e vou guardar este código para uso posterior.


GOSTEI 0
POSTAR