Pergunta : A idade de Delphi entre duas datas retornou como o ano e os meses

Pode somwebody por favor ajudar. Eu preciso de calcular a idade não somente em anos mas os meses too.

I têm um D.O.B e uma data de início do risco (alguma data no futuro). o

I encontrou muitos exemplos apenas dos anos que estão sendo calculados mas não pode encontrar o código para calcular a ajuda dos meses too.

Please!!!

Alan
class= do

Resposta : A idade de Delphi entre duas datas retornou como o ano e os meses

Eu usei a unidade dos dateutils com métodos YearsBetween e MonthsBetween, eu igualmente põr 2 TDateTimePickers sobre meu formulário com nomes Date1 e Date2:
1:
2:
3:
4:
5:
6:
7:
8:
var
  anos, meses: inteiro;
começar
  anos: = YearsBetween (Date1.Date, Date2.Date);
  meses: = MonthsBetween (Date1.Date, Date2.Date) - anos * 12;
  showmessage (inttostr (anos));
  showmessage (inttostr (meses));
extremidade;
Outras soluções  
 
programming4us programming4us