valeu pela dica meu caro. abraços
----- Original Message -----
From: "Washington Tavares" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Wednesday, July 12, 2006 9:14 AM
Subject: RE: [delphi-br] Aniversário
> Tente dessa forma:
>
> With qrAniBen do
> Begin
> Close;
> Sql.Clear;
> Sql.Add('Select * from SolicitanteCadastro');
> Sql.Add('where EXTRACT(Day from DataNascimento)=extract(Day from
> (Cast('now' as DATE)+2))');
> Sql.Add('And EXTRACT(Month from DataNascimento)=extract(Month from
> (Cast('now' as DATE)+2))');
> Sql.Add('Order by NomeSolicitante');
> Open;
> end;
>
>
> Wota
>
> >From: "RD Sistemas" <[EMAIL PROTECTED]>
> >Reply-To: delphi-br@yahoogrupos.com.br
> >To: "Delphi BR" <delphi-br@yahoogrupos.com.br>
> >Subject: [delphi-br] Aniversário
> >Date: Tue, 11 Jul 2006 18:04:30 -0300
> >
> >Salve nobres colegas. Utilizo esta query para verificar a data de
> >aniversário das pessoas cadastradas.
> >
> > With qrAniBen do
> > Begin
> > Close;
> > Sql.Clear;
> > Sql.Add('Select * from SolicitanteCadastro');
> > Sql.Add('where Extract(Month From DataNascimento)=:Data');
> > Sql.Add('Order by NomeSolicitante');
> > ParamByName('Data').Value:=StrToInt(DataNas.Text);
> > Open;
> > end;
> > If qrAniBen.IsEmpty then ShowMessage('Nenhum registro encontrado')
> >
> >Até ai tudo bem, a dúvida é a seguinte: como faço para que a data de
> >aniversário da pessoa me seja mostrada com dois dias de antecedência?
> >
> >Gratos.
> >
> >Ralp Alves Bezerra
> >[EMAIL PROTECTED]
> >MSN: [EMAIL PROTECTED]
> >
> >
> >
> >---
> >avast! Antivirus: Mensagem livre de virus.
> >Virus Database (VPS): 0628-2, 11/07/2006
> >Testado em: 11/07/2006 18:04:31
> >avast! - copyright (c) 1988-2006 ALWIL Software.
> >
> >
> >
> >
> >[As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> >--
> ><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> >Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
>
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
>
> ---
> avast! Antivirus: Mensagem livre de virus.
> Virus Database (VPS): 0628-3, 12/07/2006
> Testado em: 12/07/2006 10:49:19
> avast! - copyright (c) 1988-2006 ALWIL Software.
>
>
>
---
avast! Antivirus: Mensagem livre de virus.
Virus Database (VPS): 0628-3, 12/07/2006
Testado em: 12/07/2006 10:52:32
avast! - copyright (c) 1988-2006 ALWIL Software.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
