function DaysBetween(const ANow, AThen: TDateTime): Integer
Возвращает количество полных дней между двумя датами. При вычислении дробная часть (время) отбрасывается.
Параметры: