| 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; |
|
|