| AddWeeks Function | 
Unit
QESBPCSDateTime
Declaration
Function AddWeeks(const DT: TDateTime; const Weeks: Extended): TDateTime;
| Parameters | 
| DT | Date/Time to process. | 
| Weeks | Number of Weeks to Add - can be negative. | 
Category
Date/Time Arithmetic Routines
Week Based Arithmetic RoutinesImplementation
 
| function AddWeeks (const DT: TDateTime; const Weeks: Extended): TDateTime;
begin
     Result := DT + Weeks * 7;
End; | 
|  |