Problemas com parâmetros
Preciso fazer uma consulta SQL no Delphi (com MySQL) utilizando o componente SQLQuery da paleta dbexpress. Passo os parâmetros normalmente como fazia para o Interbase.
Assim:
´SELECT * FROM PRO WHERE DESCRICAO LIKE :PDESCRICAO´
sqryprodutos.ParambyName(´PDESCRICAO´).value:=Trim(edtdescricao.text);
Isso tá me dando erro dizendo que o campo PDESCRICAO não existe mas PDESCRICAO não é field é parâmetro.
Como faço para resolver o problema?
Assim:
´SELECT * FROM PRO WHERE DESCRICAO LIKE :PDESCRICAO´
sqryprodutos.ParambyName(´PDESCRICAO´).value:=Trim(edtdescricao.text);
Isso tá me dando erro dizendo que o campo PDESCRICAO não existe mas PDESCRICAO não é field é parâmetro.
Como faço para resolver o problema?
Braytiner Heggendorn
Curtidas 0
Respostas
Henriquem
06/03/2004
E aí!!! Blz??!!!
Coloque por favor a mensagem de erro exatamente como aparece pra vc, pois se da erro de parametro, pode ser que vc não tenha definido o tipo dele no PARAMS da Query!!!!
Falou.
Coloque por favor a mensagem de erro exatamente como aparece pra vc, pois se da erro de parametro, pode ser que vc não tenha definido o tipo dele no PARAMS da Query!!!!
Falou.
GOSTEI 0
Braytiner Heggendorn
06/03/2004
A mensagem de erro tá postada acima. diz que campo PEDESCRICAO não foi encontrado
GOSTEI 0
Henriquem
06/03/2004
É...
Vc definiu o tipo do parametro na query? pq eu simulei exatamente a mesma coisa aqui e funcionou belezinha... inclusive coloquei os mesmos nomes...
Só mudei a tabela que fiz o Select pra fazer esse teste aí em baixo!!!!
Dentro da Query:
SELECT * FROM Filho WHERE Fil_Des LIKE :PDESCRICAO
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Query1.Close;
Query1.ParambyName(´PDESCRICAO´).value:=Trim(edtdescricao.text);
Query1.open;
if Query1.IsEmpty then
ShowMessage(´Funcionou´);
end;
E deu certo....
Vc definiu o tipo do parametro na query? pq eu simulei exatamente a mesma coisa aqui e funcionou belezinha... inclusive coloquei os mesmos nomes...
Só mudei a tabela que fiz o Select pra fazer esse teste aí em baixo!!!!
Dentro da Query:
SELECT * FROM Filho WHERE Fil_Des LIKE :PDESCRICAO
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Query1.Close;
Query1.ParambyName(´PDESCRICAO´).value:=Trim(edtdescricao.text);
Query1.open;
if Query1.IsEmpty then
ShowMessage(´Funcionou´);
end;
E deu certo....
GOSTEI 0