| DatesInSameMonth Function |
Unit
QESBPCSDateTime
Declaration
Function DatesInSameMonth(const DT1, DT2: TDateTime): Boolean;
| Parameters |
| DT1 | First Date/Time to process. |
| DT2 | Second Date/Time to process. |
Category
Date/Time Arithmetic Routines
Month Based Arithmetic Routines
Date/Time ComparisonImplementation
function DatesInSameMonth (const DT1, DT2: TDateTime): Boolean;
begin
Result := Date2Month (DT1) = Date2Month (DT2);
End; |
|
|