Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: DaysInAYear
DaysInAYear
|
function DaysInAYear ( const Year : Word ) : Word; |
Функция (Unit DateUtils)
|
Выдает число дней в году
|
Описание:
|
Функция DaysInAYear выдает число дней в данном Году. Год может быть в диапазоне 0..9999 |
Пример кода: Сколько дней в високосном 2000 г?
|
begin // Сколько дней в високосном 2000 г? ShowMessage('Дней в 2000г. = '+ IntToStr(DaysInAYear(2000))); end;
Результат:
|
Дней в 2000г. = 366 |