ISLEAPYEAR Delphi

ISLEAPYEAR

Модуль: SysUtils
function IsLeapYear(Year: Word): Boolean;

Функция проверяет, является ли год, указанный в параметре (Year), високосным (возвращает True ) или нет ( False ).

Чтобы получить год от даты, сохраненной в формате TDateTime , используйте функцию YearOf :