| EndOfWeekNo Routines |
Unit
QESBPCSDateTime
| Overloaded Variants |
| Function EndOfWeekNo(const WeekNo, Year: Word): TDateTime; |
| Function EndOfWeekNo(const WeekNo, Year: Integer): TDateTime; |
Declaration
Function EndOfWeekNo(const WeekNo, Year: Word): TDateTime;
| Parameters |
| WeekNo | Week Number in given year. |
| Year | 4 digit year such as 1999. |
Category
Date/Time Arithmetic Routines
Week Based Arithmetic RoutinesImplementation
function EndOfWeekNo (const WeekNo, Year: Word): TDateTime;
begin
Result := StartOfWeekNo (WeekNo, Year) + 6;
End; |
Declaration
Function EndOfWeekNo(const WeekNo, Year: Integer): TDateTime;Implementation
function EndOfWeekNo (const WeekNo, Year: Integer): TDateTime;
begin
Result := StartOfWeekNo (WeekNo, Year) + 6;
End; |
|
|