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

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

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

IsLeapYear
Функция
Возвращает True, если данный календарный год високосный SysUtils unit
  function IsLeapYear ( const Year : Word ) : Boolean;


Описание
Функция IsLeapYear возвращает True, если данное календарное значение является високосным годом.

Год может иметь значение 0.. 9999
Похожие команды
DayOfTheYear  Выдает день года для значения TDateTime (ISO 8601)

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

MonthDays  Выдает число дней в месяце

MonthOfTheYear  Выдает месяц года для значения TDateTime

 
Пример кода : 2000 год был високосным?
begin
  if IsLeapYear(2000)
  then ShowMessage('2000 был високосным годом')
  else ShowMessage('2000 не был високосным годом');
end;
2000 был високосным годом
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2022 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

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