Source position: calendar.pp line 43
type TDisplaySettings = set of (
dsShowHeadings,
dsShowDayNames,
dsNoMonthChange,
dsShowWeekNumbers
);