Delphi-Help

Описание

var ShortDayNames : array[1..7] of string;
array[1] := 'Sun';
array[2] := 'Mon';
array[3] := 'Tue';
array[4] := 'Wed';
array[4] := 'Wed';
array[5] := 'Thu';
array[6] := 'Fri';
array[7] := 'Sat';

Переменная ShortDayNames обеспечивает массив коротких строковых названий дней недели.

Так как это - массив, вы можете модифицировать значения по умолчанию (установленные языком Windows), но это не рекомендуется.

Пример кода

var
myDate : TDateTime;
day    : string;

begin
myDate := EncodeDate(2002, 12, 31);

day := ShortDayNames[DayOfWeek(myDate)];

ShowMessage('Рождество 2002 это '+day);
end;

Рождество 2002 это Вторник

Примечание

Предупреждение: эти значения используют Воскресение как начальное значение. Это не согласовано со стандартом ISO 8601. Используйте с DayOfWeek, который также обрабатывает Воскресенье как первый день недели.

Вам советуют использовать DayOfTheWeek, который согласован с ISO 8601, используя Понедельник как начало недели.