Number of days in a month of a certain year.
Source position: dateutil.inc line 123
function DaysInAMonth( |
const AYear: Word; |
const AMonth: Word |
):Word; |
AYear |
|
Year in which the month occurs. |
AMonth |
|
Month of which the number of days should be returned. |
The number of days in month AMonth, in year AYear.
DaysInYMonth returns the number of days in the month AMonth in the yearAYear. The return value takes leap years into account.
|
Return the number of weeks in a given year. |
|
|
return the number of weeks in the year, given a date. |
|
|
Return the number of days in the year in which a date occurs. |
|
|
Number of days in a particular year. |
|
|
Return the number of days in the month in which a date occurs. |
Program Example17; { This program demonstrates the DaysInAMonth function } Uses SysUtils,DateUtils; Var Y,M : Word; Begin or:=1992 to 2010 do or:=1 to 12 do Writeln(LongMonthNames[m],' ',Y,' has ',DaysInAMonth(Y,M),' days.'); End.