IsJulyNow Function
Returns True if today's Month is July.

Unit
QESBPCSDateTime

Declaration
Function IsJulyNow: Boolean;

Category
Date/Time Comparison

Implementation

function IsJulyNow: Boolean;
begin
     Result := Date2Month (Date) = 7;
End;


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