IsFirstDayOfMonth Function
Returns true if the date is the first day of a Month.

Unit
QESBPCSDateTime

Declaration
Function IsFirstDayOfMonth(const DT: TDateTime): Boolean;

Parameters
DT Date to process.

Category
Date/Time Comparison
Month Based Arithmetic Routines

Implementation

function IsFirstDayOfMonth (const DT: TDateTime): Boolean;
begin
     Result := Date2Day (DT) = 1;
End;


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