Страница 1 из 1

Вычисление разницы годов

Добавлено: 03 апр 2006, 12:00
pH
Нужно вычислить количество полных годов между двумя датами .

Делаю так :

function YB(var Date1,Date2:Tdatetime): Integer; cdecl; export;
begin
Result := YearsBetween(Date1,Date2)
end;

А при вызове получаю 0 :(

Укажите на ошибку пожалуйста :?

Re: Вычисление разницы годов

Добавлено: 03 апр 2006, 12:46
hvlad
Читай о том, как даты передаются в UDF

Re: Вычисление разницы годов

Добавлено: 03 апр 2006, 14:03
Dimitry Sibiryakov
pH писал(а):Нужно вычислить количество полных годов между двумя датами.
А что, простое CAST((Date2-Date1)/365.400 AS INTEGER) уже считается некошерным?