IdDayShortNames: array[0..IdDaysInWeek] of string = ( '', SShortDayNameSun, SShortDayNameMon, SShortDayNameTue, SShortDayNameWed, SShortDayNameThu, SShortDayNameFri, SShortDayNameSat );