WeeksPerFortnight
WeeksPerFortnight = 2
Example
procedure AddFortnights(const StartDate: TDateTime; Count: Integer;
var FinishDate: TDateTime);
begin
FinishDate := IncWeek(StartDate, Count * WeeksPerFortnight);
end;
Usage
WeeksPerFortnight defines the exact two-week size of a fortnight without choosing a calendar anchor or year-boundary policy.
Additional Technical Info
WeeksPerFortnight is registered from Delphi DateUtils as a signed LongInt. A fortnight is exactly two seven-day weeks, or 14 nominal calendar days.
The constant does not define when a reporting fortnight starts, how partial periods are numbered, or whether an annual series resets at a calendar, fiscal or ISO week-year boundary. Store or configure that anchor separately.
For civil dates, use IncWeek/IncDay rather than assuming a fixed number of elapsed seconds across timezone offset changes. Validate large counts before multiplying. The example is source-reviewed only; no date arithmetic was executed.
Related Code Library entries
- DaysPerWeek - exact seven-day week size.
- FortnightPerYear - approximate annual count and its remainder.
External references
- Embarcadero System.DateUtils - declaring Delphi unit.
- Free Pascal WeeksPerFortnight - compatible constant.