Source position: dateutil.inc line 259
function WithinPastDays(
const ANow: TDateTime;
const AThen: TDateTime;
const ADays: Integer
):Boolean;