Fórum Erro Consulta ADOQuery #152997

08/04/2003

0

Tenho a seguinte query:

//Executa a Consulta
qry_CarregaDados.Close;
qry_CarregaDados.SQL.Clear;
qry_CarregaDados.SQL.Add(´SELECT *´);
qry_CarregaDados.SQL.Add(´ FROM Tabea WHERE ´);
qry_CarregaDados.SQL.Add(´Nome_Familia = :EVE and Nome_Classe = :EVE1´);
qry_CarregaDados.SQL.Add(´ ORDER BY Codigo ´);
qry_CarregaDados.Parameters.ParamByname(´EVE´).Value := edt_Familia.Text;
qry_CarregaDados.Parameters.ParamByname(´EVE1´).Value := edt_Classe.Text;
qry_CarregaDados.Open;

Quando executo dá um erro de Parâmetros insuficiêntes que Eram Esperados 3.


Anonymous

Anonymous

Responder

Posts

08/04/2003

Thales

Tente fazero seguinte:

procedure.....
var
str1, str2, str3: string;

begin
//Executa a Consulta
qry_CarregaDados.Close;
qry_CarregaDados.SQL.Clear;
str1 := ´ SELECT * ´;
str2 := ´ FROM Tabea WHERE ´;
str3 := ´ Nome_Familia = :EVE and Nome_Classe = :EVE1 ´;
qry_CarregaDados.SQL.Add(str1 + str2 + str3+ ´ ORDER BY Codigo ´);
qry_CarregaDados.Parameters.ParamByname(´EVE´).Value := edt_Familia.Text;
qry_CarregaDados.Parameters.ParamByname(´EVE1´).Value := edt_Classe.Text;
qry_CarregaDados.Open;


Responder

Gostei + 0

08/04/2003

Anonymous

Verifique a quantidade de paramentros da propriedade Parameters do camponente ADOQuery.


um abraço,
Rafael Helm.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar