Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: LongDayNames
LongDayNames
|
var LongDayNames : array[1..7] of string; array[1] := 'Sunday'; array[2] := 'Monday'; array[3] := 'Tuesday'; array[4] := 'Wednesday'; array[5] := 'Thursday'; array[6] := 'Friday'; array[7] := 'Saturday'; |
Переменная (Unit SysUtils)
|
Массив названий дней недели, начинается с 1 = Воскресенье
|
Описание:
|
Переменная LongDayNames содержит массив полных строковых названий дней недели. Так как это - массив, вы можете модифицировать значения по умолчанию (установленные регионом Windows), но это рекомендуется. |
Пример кода: Показ дня недели для Рождества 2002г
|
var myDate : TDateTime; day : string; begin myDate := EncodeDate(2002, 12, 31); day := LongDayNames[DayOfWeek(myDate)]; ShowMessage('Рождество 2002г. - '+day); end;
Результат:
|
Рождество 2002г. - Вторник |
Примечание:
|
Предупреждение: эти значения используют Воскресенье как начальное значение. Это не является стандартом ISO 8601. Используйте с DayOfWeek, который также обрабатывает воскресенье как первый день недели. Вам советуют использовать DayOfTheWeek, который соответсвует ISO 8601, используя Понедельник в качестве начала недели. |