Delphi: erro na consulta de aniversariantes

Delphi

27/04/2017

Boa tarde pessoal!

Estou usando o DELPHI 2010 com banco ACCESS e surgiu o seguintes erros no código em tela:

Qryclientes.Close;
Qryclientes.SQL.Clear;
Qryclientes.SQL.Add('select * from Clientes');
Qryclientes.SQL.Add('where extract(month from Nascimento) = :Mes');
Qryclientes.ParamByName('Mes').AsInteger := StrToInt(EdtNiver.Text);
Qryclientes.Open;

Erros:

[DCC Error] UConsultas.pas(40): E2003 Undeclared identifier: 'ParamByName'
[DCC Error] UConsultas.pas(40): E2066 Missing operator or semicolon

Alguém sabe me dizer o que está acontecendo??

Grato.
Mailson Janoca

Mailson Janoca

Curtidas 0

Melhor post

Ediberto Alves

Ediberto Alves

27/04/2017

Olá!

Vc colocou esse mesma query na sua tabela para retornar o resultado esperado?
GOSTEI 1

Mais Respostas

Jones Granatyr

Jones Granatyr

27/04/2017

Opa! Ao invés de colocar o ParamByName, coloque Params[0]

Seria somente pra testar se o problema está na query ou algo com o ParamByName
GOSTEI 1
Mailson Janoca

Mailson Janoca

27/04/2017

Bom dia!

Agradeço pela a ajuda, mas não deu certo!
GOSTEI 0
Daniel Araújo

Daniel Araújo

27/04/2017

Bom dia!
Essa query que tu tá utilizando é de qual componente? BDE, ADO, DBExpress, etc?
GOSTEI 1
Mailson Janoca

Mailson Janoca

27/04/2017

Bom dia

E da paleta ADO.
GOSTEI 0
Daniel Araújo

Daniel Araújo

27/04/2017

Tenta substituir isso:
Qryclientes.ParamByName('Mes').AsInteger := StrToInt(EdtNiver.Text);


Por isso:
Qryclientes.Parameters.ParamByName('Mes').Value := StrToInt(EdtNiver.Text);


Se a resposta foi útil dê um like!!!
GOSTEI 0
Alex Giordan

Alex Giordan

27/04/2017

Boa noite.
Uma sugestão, pegue o mês em uma função separada, e depois já passe pronto formatado no seu Qryclientes.SQL.Add('where extract(month from Nascimento) = :Mes'); assim vc não necessitaria mais do ParamByName.
GOSTEI 0
Mailson Janoca

Mailson Janoca

27/04/2017

Bom dia!

Não deu ....
GOSTEI 0
Mailson Janoca

Mailson Janoca

27/04/2017

Bom dia!

Poderia me ajudar ???
GOSTEI 0
Cesar Azeredo

Cesar Azeredo

27/04/2017

Tenta Qryclientes.Params.paramvalues[''Mes''] := StrToInt(EdtNiver.Text);
GOSTEI 0
Alex Giordan

Alex Giordan

27/04/2017

Coloca ai para nós todo o seu método que esta dando erro. Grato
GOSTEI 0
POSTAR