Source position: dateutil.inc line 265
function WithinPastMonths(
const ANow: TDateTime;
const AThen: TDateTime;
const AMonths: Integer
):Boolean;