Delphi.Работа с датой - Помощь студентам

YaNovichok · 06.10.2010, 10:57

Уважаемые гуру подскажите пожалуйста как реализовать
При открытии формы

Код:

procedure TForm8.FormActivate(Sender: TObject);
begin
cxDateEdit1.Date:=(Now());
end;

выводит сегоднящнюю дату, как сделать чтоб

cxDateEdit2 - выдавал автоматом дату на 2 недели вперед (cxDateEdit2-компонент DevExpress), ну в крайнем случае можно c DataTimePicker

Stilet · 06.10.2010, 11:06

Код:

uses DateUtils...
...
cxDateEdit1.Date:=IncWeek(Now(),2);

YaNovichok · 06.10.2010, 12:15

Спасибо за подсказку с ...uses DateUtils, получилось....

XeruH · 06.10.2010, 15:35

Код:

cxDateEdit1.Date := Now + 14;

без DateUtils.

06.10.2010, 10:57	#1
YaNovichok Регистрация: 06.10.2010 Сообщений: 4	Delphi.Работа с датой Уважаемые гуру подскажите пожалуйста как реализовать При открытии формы Код: `procedure TForm8.FormActivate(Sender: TObject); begin cxDateEdit1.Date:=(Now()); end;` выводит сегоднящнюю дату, как сделать чтоб cxDateEdit2 - выдавал автоматом дату на 2 недели вперед (cxDateEdit2-компонент DevExpress), ну в крайнем случае можно c DataTimePicker Последний раз редактировалось Stilet; 06.10.2010 в 11:07.

06.10.2010, 11:06	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Код: `uses DateUtils... ... cxDateEdit1.Date:=IncWeek(Now(),2);` I'm learning to live...

06.10.2010, 15:35	#4
XeruH Форумчанин Регистрация: 17.09.2010 Сообщений: 229	Код: `cxDateEdit1.Date := Now + 14;` без DateUtils. Правильно заданный вопрос - половина ответа!

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Работа с датой	Golovastik	PHP	5	07.07.2010 00:25
Работа с датой	EugeneIsmatulin	Общие вопросы Delphi	8	16.06.2009 13:24
Работа с датой	xDjarx	БД в Delphi	38	02.05.2009 14:21
Работа с датой	Aleksandr	Общие вопросы Delphi	12	29.09.2008 14:01
Работа с датой	Dunpeal	Общие вопросы Delphi	5	15.05.2008 12:05

06.10.2010, 12:15	#3
YaNovichok Регистрация: 06.10.2010 Сообщений: 4	Спасибо за подсказку с ...uses DateUtils, получилось....