Skip to content

    DaysInAMonth

    Number of days in a month of a certain year.

    Declaration

    Source position: dateutil.inc line 124

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

    Arguments

    Name Description
    AYear Year in which the month occurs.
    AMonth Month of which the number of days should be returned.

    Function result

    The number of days in month AMonth, in year AYear.

    Description

    DaysInYMonth returns the number of days in the month AMonth in the yearAYear. The return value takes leap years into account.

    See also

    Name Description
    WeeksInAYear Returns the number of weeks in a given year.
    WeeksInYear Returns the number of weeks in the year, given a date.
    DaysInYear Return the number of days in the year in which a date occurs.
    DaysInAYear Number of days in a particular year.
    DaysInMonth Return the number of days in the month in which a date occurs.

    Example

    Program Example17;

{ This program demonstrates the DaysInAMonth function }

Uses SysUtils,DateUtils;

Var
  Y,M : Word;

Begin
  For Y:=1992 to 2010 do
    For M:=1 to 12 do
      Writeln(LongMonthNames[m],' ',Y,' has ',DaysInAMonth(Y,M),' days.');
End.