Delphi-Help

Описание

function DaysInAYear ( const Year : Word ) : Word;

Функция DaysInAYear выдает число дней в данном Году.
Год может быть в диапазоне 0..9999

Пример кода

begin
// Сколько дней в високосном 2000 г?
ShowMessage('Дней в 2000г. = '+
IntToStr(DaysInAYear(2000)));
end;

Дней в 2000г. = 366

Примечание