Разное
Облака / 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.



Последние книги
Самое популярное
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация



Вопросы
  Удалить пробелы в начале и конце
   Категория: Текст и строки
  Число строкой с предстоящими нулями
   Категория: Текст и строки
  Список ошибок BDE
   Категория: Базы данных
  Поиск по EasyTable
   Категория: Базы данных
  Получить имена всех папок и файлов в директории
   Категория: Файловая система
  Фреймы
   Категория: Компоненты
  Определение размера файла
   Категория: Файловая система
  Как подключить или отключить сетевой диск
   Категория: Интернет и Сети

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

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 ShortMonthNames
var ShortMonthNames : array[1..12] of string;
array[ 1] := 'Jan';
array[ 2] := 'Feb';
array[ 3] := 'Mar';
array[ 4] := 'Apr';
array[ 5] := 'May';
array[ 6] := 'Jun';
array[ 7] := 'Jul';
array[ 8] := 'Aug';
array[ 9] := 'Sep';
array[10] := 'Oct';
array[11] := 'Nov';
array[12] := 'Dec';
Переменная (Unit SysUtils)
Массив названий дней месяца, начиная с 1 = Январь
Описание:
Переменная ShortMonthNames обеспечивает массив коротких строковых названий месяцев года.

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

var
  month  : string;

begin
  month  := ShortMonthNames[12];
  ShowMessage('12-ый месяц = '+month);
end;

Результат:
12-ый месяц = Декабрь

  << Вернуться