Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: StrToDate
StrToDate
|
1 function StrToDate ( const Date : string ) : TDateTime; 2 function StrToDate ( const Date : string; const FormatSettings : TFormatSettings ) : TDateTime; |
Функция (Unit SysUtils)
|
Конвертирует строку с датой в значение типа TDateTime
|
Описание:
|
Функция StrToDate предназначена для преобразования строки Date в значение типа TDateTime. Строка с датой должна соответствовать формату, заданному в переменной ShortDateFormat, и использовать символ DateSeparator для разделения значений дня, месяца и года. Форматом по умолчанию для Англии является день/месяц/год, где день должен быть в диапазоне 1..31 (зависит от месяца/года) месяц должен быть в диапазоне 1..12 год должен быть в диапазоне 0..9999 (необязательный параметр) Если год не вводиться, то функция использует текущий год. Обратите внимание, что, к примеру, 0015-й год должен быть задан вместе с цифрами века; 15-й год будет расценен как относящийся к текущему веку. Если год двузначный, то век определяется значением переменной TwoDigitYearCenturyWindow. Время будет установлено в 0, то есть на начало заданного дня. Любые ошибки в строке с датой вызовут исключение EConvertError. Второй вариант этой функции предназначен для использования в потоках. Перед вызовом функции вы должны заполнить запись FormatSettings. Функция делает локальную копию глобальных переменных форматирования, что делает ее потокобезопасной. |
Пример кода: Показ строковых преобразовний года с 2-мя и 4-мя цифрами
|
var myDate : TDateTime; begin myDate := StrToDate('15/03/75'); ShowMessage('15/03/75 = '+DateTimeToStr(myDate)); myDate := StrToDate('01/01/2075'); ShowMessage('01/01/2075 = '+DateTimeToStr(myDate)); end;
Результат:
|
15/03/75 = 15/03/1975 01/01/2075 = 01/01/2075 |