PeriodBetween procedure
Return the period (in years, months, days) between two dates.
Declaration
procedure PeriodBetween(const ANow: TDateTime; const AThen: TDateTime;
out Years: Word; out months: Word;
out days: Word)Description
PeriodBetween returns the timespan between 2 dates (
ANow and
AThen), expressed as a number of years, months and days in the parameters
Years,
months and
days.
Only complete years, months and days are reported.
If ANow is before AThen, their values are reversed so
the result is always positive.
See also
An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.