Age in Months

[rhartl]

Anyone ever have to write a routine in Delphi that returns a person's age in months to the nearest 1/10th of a month. I have been wrestling with this for several days now, and I can't seem to come up with the solution. Help!

-- Rich

[Kambiz]

Code: Select all

uses dateutils;

var AgeInMonth: Double;

AgeInMonth := MonthSpan(Today, BirthDate);

[rhartl]

Thanks a million Kambiz.

-- Rich