Справочник функций и процедур Delphi: MonthDays

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

 

MonthDays
Константа
Выдает число дней в месяце SysUtils unit
  
const MonthDays : array [Boolean] of TDayTable =
    ((31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31),
    (31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31));

Google  
 
Описание
Константа MonthDays - полезная часть модуля SysUtils. Она выдает число дней в месяце; 29 возвращается для февраля, если год високосный (первый параметр Булев массив). Это лучше всего показано на предоставленном примере кода.
Похожие команды
DaysInAMonth  Выдает число дней в месяце

DaysInAYear  Выдает число дней в году

MinsPerDay  Выдает число минут в дне

SecsPerDay  Выдает число секунд в дне

 
Пример кода : Сколько дней в феврале 2000г.?
begin
  // Сколько дней в феврале 2000г.?
  ShowMessage('Количество дней в Феврале 2000г. = '+
              IntToStr(MonthDays[IsLeapYear(2000)][2]));
end;
Количество дней в Феврале 2000г. = 29
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook