Разница между 2 датами Опции

[klem4]

2 переменные TDateTime, нужно узнать разницу между ними в днях, даты могут быть в разных годах, так что в чистом виде DayOfTheYear юзать нельзя ...

Может есть какое-то средство чтобы без рукоделия посчетать разницу ? Какая-нибудь ф-я, которая возвращает количество дней от начала исчисления дат ?

Ответ найден:

function DaysBetween(const ANow, AThen: TDateTime): Integer;

Description

Call DaysBetween to obtain the difference, in days, between two TDateTime values.

DaysBetween counts only whole days that have elapsed. Thus, DaysBetween reports the difference between Dec 31, 1999 11:59 PM and Jan 1, 2000 11:58 PM as 0 because the difference is one minute short of an entire day.