Клуб программистов

    Функция StrToDateTime предназначена для преобразования строки DateTime в значение типа TDateTime.

     Во-первых, часть строки с датой должна соответствовать формату, заданному в переменной ShortDateFormat, и использовать символ DateSeparator (точка - разделитель) для разделения значений дня, месяца и года.

     Во-вторых, часть с временем, отделенная пробелом от даты должна соответствовать формату, заданному в переменной LongTimeFormat и использовать символ TimeSeparator (точка - разделитель для разделения значений часа, минуты и секунды.

     Форматом по умолчанию для Англии является день/месяц/год час:минута:секунда.мсек, где:

    
    день должен быть в диапазоне 1..31 (зависит от месяца/года)
    месяц должен быть в диапазоне 1..12
    год должен быть в диапазоне 0..9999 (необязательный параметр)
    час должен быть в диапазоне 0..23
    минута должен быть в диапазоне 0..59 (необязательный параметр)
    секунда должен быть в диапазоне 0..59 (необязательный параметр)
    миллисекунда должен быть в диапазоне 0..999 (необязательный параметр)

     Если год не вводиться, то функция использует текущий год.

     Обратите внимание, что, к примеру, 0015-й год должен быть задан вместе с цифрами века; 15-й год будет расценен как относящийся к текущему веку.

     Если год двузначный, то век определяется значением переменной TwoDigitYearCenturyWindow.

     Если время установлено в 0, то это указывает на начало заданного дня.

     Любые ошибки в строке с датой вызовут исключение EConvertError.

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

var
   myDateTime : TDateTime;

begin
   myDateTime := StrToDateTime('23/02/75 12');
   ShowMessage('23/02/75 12 = '+DateTimeToStr(myDateTime));

   myDateTime := StrToDateTime('23/02/2075 12:34:56');
   ShowMessage('23/02/2075 12:34:56 = '+DateTimeToStr(myDateTime));
end;

23/02/75 12 = 23/02/1975 12:00:00
23/02/2075 12:34:56 = 23/02/2075 12:34:56