Функция DaysInAYear в Delphi выдает число дней в году.
Math unit
function DegToRad (const Degrees : Extended) : Extended;
Функция DaysInAYear выдает число дней в данном Году.
Год может быть в диапазоне 0..9999.
Функция DaysInAYear: Узнаём сколько дней в високосном 2000 году
begin
// Сколько дней в високосном 2000 г?
ShowMessage('Дней в 2000 году = '+
IntToStr(DaysInAYear(2000)));
end;Результат
Дней в 2000 году = 366
Похожие функции, процедуры и команды
DaysBetween — выдает целый число дней между 2 датами.
DaysInAMonth — выдает число дней в месяце.
DaySpan — выдает дробное число дней между 2 датами.
MinsPerDay — выдает число минут в дне.
MonthDays — выдает число дней в месяце.
SecsPerDay — выдает число секунд в дне.
Угостить автора чашечкой кофе