Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Автоматическое определения кодировки текста
   Категория: Текст и строки
  Как показать balloon tooltips в программе
   Категория: Приложение
  Число четное или нечетное
   Категория: Математика
  Перекодировка в DBASE
   Категория: Базы данных
  Упаковать BD Accuracer
   Категория: Базы данных
  Компонент MainMenu
   Категория: Компоненты
  Удаление файла в корзину
   Категория: Файловая система

Delphi - Справочник: ShortDayNames

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 ShortDayNames
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';
Переменная (Unit SysUtils)
Массив названий дней недели, начиная с 1 = Воскресенье
Описание:
Переменная ShortDayNames обеспечивает массив коротких строковых названий дней недели.

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

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, используя Понедельник как начало недели.

  << Вернуться