[Overview][Constants][Procedures and functions] Reference for unit 'dateutils' (#rtl)

EndOfAWeek

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

Declaration

Source position: line 0

function EndOfAWeek(

  const AYear: Word;

  const AWeekOfYear: Word;

  const ADayOfWeek: Word

):TDateTime;

function EndOfAWeek(

  const AYear: Word;

  const AWeekOfYear: Word

):TDateTime;

Arguments

ADayOfWeek

  

Day of the week

Description

EndOfAWeekreturns a TDateTimevalue with the date of the last moment (23:59:59:999) on the indicated day of the week indicated by the AYear, AWeek, ADayOfWeekvalues.

The default value for ADayOfWeekis 7.

See also

StartOfTheWeek

  

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

EndOfTheWeek

  

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

EndOfAWeek

  

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

StartOfAMonth

  

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

EndOfTheYear

  

Calculate a DateTime value representing the last day of a year, given a date in that year.

EndOfAYear

  

Calculate a DateTime value representing the last day of a year

EndOfTheMonth

  

Calculate a DateTime value representing the last day of the month, given a day in that month.

EndOfAMonth

  

Calculate a datetime value representing the last day of the indicated month

Example

Program Example35;

{ This program demonstrates the EndOfAWeek function }

Uses SysUtils,DateUtils;

Const
  Fmt = '"Last day of this week : "dd mmmm yyyy hh:nn:ss';
  Fmt2 = '"Last-1 day of this week : "dd mmmm yyyy hh:nn:ss';

Var
  Y,W : Word;

Begin
  Y:=YearOf(Today);
  W:=WeekOf(Today);
  Writeln(FormatDateTime(Fmt,EndOfAWeek(Y,W)));
  Writeln(FormatDateTime(Fmt2,EndOfAWeek(Y,W,6)));
End.