Справочник функций и процедур 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;

Delphi Sources

Описание
Функция 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 был високосным годом
 


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

DeLiKaTeS Tetris (Тетрис)

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker
 

Айболит (remote control)

ListBox Drag & Drop

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

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

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

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

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

Группа ВКонтакте