Em firebird seria assim

“select * from TABLE where extract (month from FIELD)=1”

Não sei se é o banco que voce usa . Olhando seu código com mais atenção dá
uma olhada no parâmetro mês em um lugar você usa caixa alta e em outro não
pode ser este o problema. Qualquer coisa posta ai. blz

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de josinaldo fernandes do nascimento
Enviada em: terça-feira, 18 de agosto de 2009 14:37
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Lista de aniversariantes do mes

 

  

Ola pessoal boa tarde
mim chamo Josinaldo e sou amante do delphi tbm
tenho uma duvida que gostaria de contar com a ajuda de vcs éo seguinte
gostaria de selecionar todos os clientes que fazem aniversario em
determinado mes e imprimir uma listagem
mais nao estou conseguindo
fiz o seguinte:

procedure TFrmAniver.Button1Click(Sender: TObject);
begin
ADOClientes.Close;
ADOClientes.SQL.Clear ;
ADOClientes.sql.Add('select * from clientes where extract(month from nasci)
= :mes');
ADOClientes.Parameters.ParamByName('Mes').Value := combobox1.Text;
ADOClientes.Open ;
end;
end.

dar a mensagem de erro 
erro nao identificado

__________________________________________________________
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



No virus found in this incoming message.
Checked by AVG - www.avg.com
Version: 8.5.409 / Virus Database: 270.13.60/2311 - Release Date: 08/18/09
06:03:00



[As partes desta mensagem que não continham texto foram removidas]

Responder a