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

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

Проблемы с StrToDate [D7, XP]


Новичок ©   (2010-07-14 01:28:00) 

Доброго времени суток! Помогите пожалуйста новичку. Не работает как надо функция StrToDate в таком куске кода:
DateSeparator:= '.';
ShortDateFormat := 'd.m.yyyy';  
date1:=StrToDate(Edit1.Text);{40373 - 14.07.2010}

date1 описал в var как TDateTime. В Edit1 данные кидаю с календаря(14.07.2010),а в точке останова на второй строке смотрю значение date1 в Watches, а там 40373 результат конвертации. В чем дело не пойму :( И хелп читал,и гуглил ничего не нашел :( (Результат конвертации нужен позже в программе для сравнения с переменными в формате TDateTime).


Плохиш   (2010-07-14 10:36:00) [1]


> Новичок   (14.07.10 01:28)  


> а в точке останова на второй строке смотрю значение date1
> в Watches, а там 40373 результат конвертации.

А что ты там хотел увидеть?


Anatoly Podgoretsky   (2010-07-14 10:13:00) [2]


> а там 40373

Похоже на правильное значение.


Германн   (2010-07-14 03:38:00) [3]

Именно 40373 дня и прошло с 12.30.1899 по/до 14.07.2010.


Германн   (2010-07-14 01:52:00) [4]


> date1 описал в var как TDateTime

TDate = Double; В Watches именно Double и показывается.


Наверх

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