| [Overview][Constants][Procedures and functions][Index] |
Determine whether a date is in a leap year.
Source position: dateutil.inc line 83
function IsInLeapYear( |
const AValue: TDateTime |
):Boolean; |
AValue |
|
Date to be checked. |
True if AValue is in a leap year, False if not.
IsInLeapYear returns True if the year part of AValue is leap year, or False if not.
|
Extract the year from a given date. |
|
|
Determine whether a time is PM or AM. |
|
|
Check whether a given date is today. |
|
|
Check if two date/time indications are the same day. |
Program Example3; { This program demonstrates the IsInLeapYear function } Uses SysUtils,DateUtils; Begin Writeln('Current year is leap year: ',IsInLeapYear(Date)); End.