Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Нестабильно работет StrToDateTime() [D2005]


Страницы:   1 2 3

sdfdh ©   (2014-04-10 20:49:00) 

Здравствуйте!
Необходимо кодировать текст в дату. Использую следующий код:

procedure TForm1.Button1Click(Sender: TObject);
Var
StrDate : string;
Fmt     : TFormatSettings;
dt      : TDateTime;
begin
fmt.ShortDateFormat:='dd.mm.yyyy';
fmt.DateSeparator  :='.';
StrDate:='02.04.2014';
dt:=StrToDateTime(StrDate,Fmt);

end;


Переменной dt присваивается 02.04.2014

Однако, если я тот же код!!! Один в один, вставляю в свое приложение, то этот же код уже не работает. dt=30.12.1899

В чем проблема? Что не так?


[ВладОшин]   (2014-04-10 21:05:00) [41]


> В чем проблема?

а внимательно посмотрели?
рискну, что юзается не та пременная, которая передается, уж больно подозрительно


Rouse_   (2014-04-10 20:57:00) [42]

А если вот так? "30.12.1899 12:00"


Страницы:   1 2 3

Наверх

Титульная страница Поиск, карта сайта Написать письмо