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

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

операции с датами [D7, XP]

Merry ©   (2009-01-27 14:07:00) 

Как к дате, указанной в edit1 прибавить, например 200 дней и полученное значение послать в edit2?

---

Германн   (2009-01-27 15:29:00) [1]

> Сергей М. ©   (27.01.09 14:29) [3]

Развращение малолеток.

---

Merry   (2009-01-27 14:39:00) [2]

>Сергей М. ©   (27.01.09 14:29) [3]
спасибо!

---

Jeer   (2009-01-27 14:30:00) [3]

> TDateж


Мда.. классный тип, почти как TПадеЖ ( скота )

---

Сергей М.   (2009-01-27 14:29:00) [4]

var D1: TDateж


> прибавить, например 200 дней


IncDay()

---

Merry   (2009-01-27 14:25:00) [5]

а как в var задать переменную D1 типа 'дата'?
я понимаю,дальше будет так:
D1:=Edit1.AsDate+200;
Edit2.text:=datetoatr(d1);

---

Sergey13   (2009-01-27 14:09:00) [6]

> [0] Merry   (27.01.09 14:07)
> Как к дате, указанной в edit1 прибавить, например 200 дней

Ты не поверишь +200

---

Наверх