Calculate a TDateTime value representing the last day of the indicated month.
Source position: dateutil.inc line 168
function EndOfAMonth( |
const AYear: Word; |
const AMonth: Word |
):TDateTime; |
AYear |
|
Year in which month occurs. |
AMonth |
|
Month to calculate end of. |
TDateTime value indicating the last day of AMonth in year AYear.
EndOfAMonth e returns a TDateTime value with the date of the last day of the month indicated by the AYear, AMonth pair.
|
Calculate the first day of the month, given a date in that month. |
|
|
Return first date of month, given a year/month pair. |
|
|
Calculate a TDateTime value representing the last day of the month, given a day in that month. |
|
|
Calculate a TDateTime value representing the last day of a year, given a date in that year. |
|
|
Calculate a TDateTime value representing the last day of a year. |
|
|
Return a day of the week, given a year, week and day in the week. |
|
|
Return the first day of the week, given a date. |
Program Example31; { This program demonstrates the EndOfAMonth function } Uses SysUtils,DateUtils; Const Fmt = '"Last day of this month : "dd mmmm yyyy'; Var Y,M : Word; Begin Y:=YearOf(Today); M:=MonthOf(Today); Writeln(FormatDateTime(Fmt,EndOfAMonth(Y,M))); End.