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