Consultando com Tabela SQL


Na paleta DBE insira uma Query e renomeia para qryaniversario (parto daqui supondo que ja sabe adcionar os campos do banco aniversario na query)

qryaniversario.close;
qryaniversario.open;
qryaniversario.indexOfName := ('Data');
qryaniversario.filtered := false;
qryaniversario.filter := 'Data >= '+ Quotedstr (datetostr (dti.Date)) + 'and Data <= ' + Quotedstr (datetostr (dtf.Date));
qryaniversario.filtered := true;

Para Verificar o resultado adcione um Dbgrid para visualizar o resultado no banco de dados