SubtractFortnights Function |
Unit
QESBPCSDateTime
Declaration
Function SubtractFortnights(const DT: TDateTime; const FNights: Extended): TDateTime;
Parameters |
DT | Date/Time to process. |
Fortnights | Number of Fortnights to Subtract - can be negative. |
Category
Date/Time Arithmetic RoutinesImplementation
function SubtractFortnights (const DT: TDateTime; const FNights: Extended): TDateTime; begin Result := AddWeeks (DT, FNights * -2); End; |
|