Logo Hardware.com.br
Lucas95
Lucas95 Super Participante Registrado
703 Mensagens 4 Curtidas

Duvida com TQuery no Delphi

#1 Por Lucas95 14/01/2011 - 15:55
Boa tarde pessoal,
tenho um formulário de consulta e nele tenho um TQuery que por padrão já vem com o SQL: "SELECT * FROM Cliente ORDER BY RazaoSocial ASC"

Então criei um campo Edit para toda vez que digitar, filtrar a tabela pelo que eu escrevi. Coloquei esse codigo no ONChange do Edit:

Query1.close;
Query1.sql.add('select * from clientes where razaosocial like :A');
Query1.parambyname('A').value:= '%' + edit1.text +'%';
Query1.open;

Mas não funciona, o que será que estou fazendo de errado?

PS: O erro que informa é "Invalid use of keyword. Token: Select".

Abração!
boa cliente from delphi sql select duvida edit tquery
Lucas95
Lucas95 Super Participante Registrado
703 Mensagens 4 Curtidas
#3 Por Lucas95
14/01/2011 - 18:44
Cara, tou usando Paradox.
A consulta quando uso o SQL Padrão ele funciona, mas quando tenta escrever no Edit, ele dá erro.

Reginaldo amigo,
obrigado mas tentei do jeito que tu falou e não funcionou, teria outra maneira?

OBSERVAÇÃO:

Pessoal, eu consegui usando esse codigo, porem não sei como adicionar o LIKE, como faço?

with query1 do
begin
close;
sql.clear;
sql.add (' select * from clientes ');
sql.add (' where razaosocial like stick_out_tongue.pngMatricula'); //Aqui estou passando a condição para o parametro do que eu quero que retorne na consulta.
parambyname('pMatricula').asString := Edit1.Text; // Aqui o que eu digitar la na caixa de texto do edit, é a condição que o parametro vai receber para retornar a consulta.
open; //abro o select
end; //fecho o bloco
© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal