Calculates a TDateTime value representing the end of a specified day.
Source position: dateutil.inc line 191
function EndOfADay( 
const AYear: Word; 
const AMonth: Word; 
const ADay: Word 
):TDateTime; overload; 
const AYear: Word; 
const ADayOfYear: Word 
):TDateTime; overload; 
AYear 

Year. 
AMonth 

Month in the year. 
ADay 

Day in the month. 
A TDateTime value representing the time 23:59:59.999 of the given day.
AYear 

Year. 
ADayOfYear 

Day of the year. 
EndOfADay returns a TDateTime value with the date/time indication of the last moment (23:59:59.999) of the day given by AYear, AMonth, ADay.
The day may also be indicated with a AYear, ADayOfYear pair.

Calculate the start of the day as a TDateTime value, given a moment in the day. 


Return the start of a day as a TDateTime value, given a day indication. 


Return the first day of the week, given a date. 


Return a day of the week, given a year, week and day in the week. 


Return first date of month, given a year/month pair. 


Calculate the first day of the month, given a date in that month. 


Calculate a TDateTime value which represents the end of a week, given a date in that week. 


Return the last moment of day of the week, given a year and a week in the year. 


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. 


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 the indicated month. 


Calculate a TDateTime value that represents the end of a given day. 
Program Example39; { This program demonstrates the EndOfADay function } Uses SysUtils,DateUtils; Const Fmt = '"End of the day : "dd mmmm yyyy hh:nn:ss'; Var Y,M,D : Word; Begin Y:=YearOf(Today); M:=MonthOf(Today); D:=DayOf(Today); Writeln(FormatDateTime(Fmt,EndOfADay(Y,M,D))); DecodeDateDay(Today,Y,D); Writeln(FormatDateTime(Fmt,EndOfADay(Y,D))); End.