IsFirstDayOfYearNow Function
Returns true if today is the first day of a Year.

Unit
QESBPCSDateTime

Declaration
Function IsFirstDayOfYearNow: Boolean;

Category
Date/Time Comparison
Year Based Arithmetic Routines

Implementation

function IsFirstDayOfYearNow: Boolean;
begin
     Result := IsFirstDayOfYear (SysUtils.Date);
End;


HTML generated by Time2HELP
http://www.time2help.com