Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
К-во рабочих дней в месяце
Категория: Математика
Категория: Математика
Корректное колесико мыши
Категория: Приложение
Категория: Приложение
Определение размера каталога
Категория: Файловая система
Категория: Файловая система
Как удалить не пустой каталог
Категория: Файловая система
Категория: Файловая система
Автоматическое определения кодировки текста
Категория: Текст и строки
Категория: Текст и строки
Программно скрыть MainMenu
Категория: Компоненты
Категория: Компоненты
Узнать запущен ли сервис FireBird
Категория: Интернет и Сети
Категория: Интернет и Сети
Установить в программу свои шрифты
Категория: Приложение
Категория: Приложение
Тpансляция ошибок в BDE
Категория: Базы данных
Категория: Базы данных
Преобразовать Римские символы в Арабские и наоборот
Категория: Текст и строки
Категория: Текст и строки
Delphi - Справочник: DateSeparator
DateSeparator
|
var DateSeparator : char; |
Переменная (Unit SysUtils)
|
Символ используемый для разделения полей отображаемой даты
|
Описание:
|
Переменная DateSeparator используется в функциях отображения даты и времени. Значением по умолчанию DateSeparator является '/', в зависимости от региона Windows. |
Пример кода: Замена сивола разделителя отображения даты
|
var mydate : TDateTime; begin myDate := EndOfAMonth(2007, 9); // 9 Февраля 2007 23:59:59.999 ShowMessage('Дата = '+DateTimeToStr(myDate)); DateSeparator := '_'; // Замена разделитель даты / ShowMessage('Дата теперь = '+DateTimeToStr(myDate)); end;
Результат:
|
Дата = 09/02/2007 Дата теперь = 09/02/2007 |
Примечание:
|
По умолчанию DateSeparator = LOCALE_SDATE |