ActiveDelphi

juniorpba · Enviada: Qua Jan 25, 2012 11:19 pm Assunto: Data de aniversario (Resolvido)

Galera preciso de uma ajuda urgente , como faço para montar uma consulta de alunos que foram cadastrados, gostaria de fazer uma lista dos aniversariantes de cada mes
nao por turma, mas geral
tpo assim MES MARÇO
DIA | NOME | TURMA
no meu cadastro começa assim turma, r.a , nome , cpf, data de nascimento, ...estas coisas de cadastro , ai eu queria q la na pesquisa so de aniversariantes do mês tal como faço para montar isso num formulario ?se alguem tiver algum programinha mais ou menos similar me manda pra mim ver meu imail eh junin-pba@hotmail.com

viox · Enviada: Qui Jan 26, 2012 2:26 am Assunto:

faz um relatório com filtro por periodo e através desse periodo você faz um select onde a data de nascimento estiver entre esse periodo...
_________________
Just another Delphi guy.

http://www.soft42.com
http://www.nortaonegocios.com.br

juniorpba · Enviada: Qui Jan 26, 2012 6:25 am Assunto:

Mais eu crio um formulario coloco uma combobox adiciono um iten tpw Aniversariante do Mes tals , na frente do combobox vai ser uma edt para pesquisa
la em baixo vai ter um dbgrid q no qual vai listar os nome certo?
agora queria saber como vai ser este codigo para listar.
sou promador iniciante , como faço ?

imex · Enviada: Qui Jan 26, 2012 8:45 am Assunto:

Você sabe fazer a conexão com o banco de dados?
Qual banco e componente de conexão costuma utilizar?
O campo da data de nascimento é do tipo Date ou semelhante?

juniorpba · Enviada: Qui Jan 26, 2012 9:11 am Assunto:

Você sabe fazer a conexão com o banco de dados?
eu to usandu firebird para implementação do banco to usandu ibexpert
Qual banco e componente de conexão costuma utilizar?
eu to usandu o Tibdatabase qui eh a conexao ne , agora para fazer as ligações é Tibdataset
O campo da data de nascimento é do tipo Date ou semelhante?
campo data esta como date

imex · Enviada: Qui Jan 26, 2012 9:36 am Assunto:

Experimente utilizar a instrução SQL abaixo:

johnny-walker · Enviada: Qui Jan 26, 2012 10:02 am Assunto:

Se for firebird eis aí:

http://www.activedelphi.com.br/forum/viewtopic.php?t=65829&highlight=aniversariantes

bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I

juniorpba · Enviada: Qui Jan 26, 2012 10:11 am Assunto:

galera fico assim a imagem , dai no combobox o codigo para verificar a pessoa como fica ?

eu tenhu um exmplo mais ou menos como fica assim

if(ComboBox1.Text = 'JANEIRO')then
begin
dm.IB_ALUNOS.SelectSQL.Add('select * from ALUNO where NOME like :busca');
dm.IB_ALUNOS.ParamByName('busca').Value := texto;
end;

é asm ?

[img=http://s18.postimage.org/57xjbaswl/image.jpg][/img]

juniorpba · Enviada: Qui Jan 26, 2012 10:57 am Assunto:

me passa o hotmail de alguem q possa me ajudar :O

imex · Enviada: Qui Jan 26, 2012 10:59 am Assunto:

A imagem que você postou está muito pequena, difícil de visualizar.
Tente adaptar o código que sugeri anteriormente.
Altere apenas a passagem do mes para o parâmetro:

juniorpba · Enviada: Qui Jan 26, 2012 11:07 am Assunto:

oq eu queria éeh apenas combobox selecionar o itens do mes e la no dbgrid lançar os nomes das pessoas q foram aniversariantes daquele mes. so isso mesmo.

juniorpba · Enviada: Qui Jan 26, 2012 12:39 pm Assunto:

Deste jeito que eu queria se fosse a pesquisa

Uploaded with ImageShack.us

imex · Enviada: Qui Jan 26, 2012 2:01 pm Assunto:

Experimente fazer um teste primeiro...
Tente executar a instrução SQL que postei no início (alterando o nome da tabela de Alunos para Aluno) através da janela SQL Editor do IBExpert. Deverá ser solicitado o preenchimento do parâmetro Mes: preencha com o número do mes, não o nome.
Verifique se funciona são exibidos os dados desejados.

juniorpba · Enviada: Qui Jan 26, 2012 3:02 pm Assunto:

esta imagem eh do meu banco de dados eu

codigo eh este ?

select
Extract(day from DataNasc) as Dia,
Nome,
Turma
from Alunos
where (Extract(Month from DataNasc) = :Mes)
order by 1, 2

Uploaded with ImageShack.us

wagnercabrera · Enviada: Qui Jan 26, 2012 3:09 pm Assunto: