IsValidDateDay function
Check whether a given year/day of year combination is a valid date.
Declaration
function IsValidDateDay(const AYear: Word; const ADayOfYear: Word)
: BooleanArguments
AYear | Year. |
ADayOfYear | Day in the year. |
Function result
True if the given combination is a valid date,
False otherwise.Description
IsValidDateDay returns
True if
AYear and
ADayOfYear form a valid date indication, or
False
otherwise.
AYear must be in the range 1..9999 to be valid.
The ADayOfYear value is checked to see whether it falls within the valid range of
dates for AYear.
See also
Example: ex9
Program Example9;
{ This program demonstrates the IsValidDateDay function }
Uses SysUtils,DateUtils;
Var
Y : Word;
Begin
For Y:=1996 to 2004 do
if IsValidDateDay(Y,366) then
Writeln(Y,' is a leap year');
End.An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.
