EndOfAMonth
Calculate a TDateTime value representing the last day of the indicated month
Declaration
Source position: dateutil.inc line 146
function EndOfAMonth(const AYear: Word; const AMonth: Word) : TDateTime;
Description
EndOfAMonth e returns a TDateTime value with the date of the last day of the month indicated by the AYear, AMonth pair.
See also
Name | Description |
---|---|
EndOfAYear | Calculate a TDateTime value representing the last day of a year |
EndOfTheMonth | Calculate a TDateTime value representing the last day of the month, given a day in that month. |
EndOfTheYear | Calculate a TDateTime value representing the last day of a year, given a date in that year. |
StartOfAMonth | Return first date of month, given a year/month pair. |
StartOfAWeek | Return a day of the week, given a year, week and day in the week. |
StartOfTheMonth | Calculate the first day of the month, given a date in that month. |
StartOfTheWeek | Return the first day of the week, given a date. |
Example
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.