Обновлено: 01 декабря, 2018

Функция DaysInAMonth в Delphi

Используемый модуль: DateUtils

Описание:

Возвращает количество дней в указанном месяце AMonth типа Word указанного года AYear типа Word.

Синтаксис:

function DaysInAMonth(const AYear, AMonth: Word): Word;

Пример использования:

uses DateUtils;
...
var
  Res: Integer;
begin
  Res:= DaysInAMonth(1999, 12); // возвращает кол-во дней в декабре 1999-го года
  ShowMessage('В декабре 1999-го года было ' + IntToStr(Res) + ' дней');
end;

Результат:

DaysInAMonth в Delphi