2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




 
 30 декабря 1899 в Delphi
Сообщение18.10.2009, 13:20 
Аватара пользователя
Это просто жесть. Нужно чтобы в поле Edit была написана текущая дата. Вот я и пытаюсь:
...
var date : TDateTime;
....
edit1.text:= DateToStr (date);
...
И выводит не сегодняшню дату, а 30 дек. 1899!!!! На компе, в левом нижнем углу экрана, дата как надо.
Что это может быть? Попробовал разбить на числа god, mes, chislo : word; функцией DecodeDate (date, god, chislo, mes); тоже самое: god=1899; mes=12; chislo=30;
Что это за беспредел?
Компилятор Borland Delphi 7.

 
 
 
 Re: 30 декабря 1899 в Delphi
Сообщение18.10.2009, 13:28 
Аватара пользователя
А где Вы присваиваете переменной date текущую дату?
http://www.delphibasics.co.uk/RTL.asp?Name=Now

 
 
 
 Re: 30 декабря 1899 в Delphi
Сообщение18.10.2009, 13:38 
Аватара пользователя
Вопрос снят. Спасибо.

 
 
 [ Сообщений: 3 ] 


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group