Ir para conteúdo
Fórum Script Brasil
  • 0

Saber Data De Aniversário


Guest Jon Pline

Pergunta

Bom dia,

Eu estou com uma dúvida e gostaria de uma ajuda vocês.

Eu gostaria de mostrar um lembrete na tela do meu programa quando um cliente cadastrado fizesse aniversário, mas não consigo realizar a pesquisa apenas por dia e mês, já que no cadastro eu tenho apenas um campo com data de nascimento.

Como posso fazer isso?

Estou usando a versão 5.0 do Delphi e tabela Paradox 7.

Desde já, muito grato.

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0
Eu gostaria de mostrar um lembrete na tela do meu programa quando um cliente cadastrado fizesse aniversário, mas não consigo realizar a pesquisa apenas por dia e mês, já que no cadastro eu tenho apenas um campo com data de nascimento.

Como posso fazer isso?

Jon Pline, o exemplo abaixo mostra como listar todos "indivíduos" da tabela Pessoas onde o mês de nascimento seja igual ao passado no parâmetro mês. Veja se consegue ajustar a suas necessidades.

Query1.SQL.Clear;

Query1.SQL.Add('SELECT *');

Query1.SQL.Add('FROM Pesoas');

Query1.SQL.Add('WHERE extract(month from DAT_NASCIMENTO) = :mês');

Query1.ParamByName('mês').AsInteger := mês; // número do mês a procurar

Query1.Open;

Se interessar avaliar o dia, utilize "extract(day from ..."

OBS: Não utilize o acento "^" em mês - foi colocado automaticamente pelo editor do forum.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,2k
×
×
  • Criar Novo...