Форум "Delphi"

Паскаль, Делфи

#0 ID © 28.02.07 18:11:45 - 28.02.07 18:16:54

Преобразование String в DateTime

Стыдно задавать этот вопрос, но уже пол часа бьюсь, не могу решить простую задачку.
Есть переменная типа String хранящая занчение ( условно) '28.02.2007 09:15:10'
Необходимо:
1. Проверить на корректность введенных данных
2. Получить значение типа TDateTime

Кинулся использовать функцию
if TryStrToDateTime(S, R, F) then MyError(S);
где
S: string;
R: TDateTime;
F: TFormatSettings;
S:= '28.02.2007 09:15:10'
F.CurrencyString := 'dd.mm.yyyy hh:mm:ss';

Не работает, хотя явно видно, что S хранит корректное значение

#1 ID © 28.02.07 18:16:54

сам спросил, сам ответил:
CurrFormatDateTime.TimeSeparator := ':';
CurrFormatDateTime.DateSeparator := '.';
CurrFormatDateTime.ShortDateFormat := 'dd.mm.yyyy';
CurrFormatDateTime.ShortTimeFormat := 'hh:mm:ss';

Написать ответ