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

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

Работа с датами [D7, XP]

Armond ©   (2008-10-02 08:50:00) 

Подскажите как сравнивать даты ? Т.е. мне нужно сделать условие, если например, текущая дата меньше той которую я ввожу, то происходит какое то условие. А можно как то перевести дату просто в число, а потом уже сравнивать просто числа ? Заранее спасибо

---

Василий Жогарев   (2008-10-02 09:57:00) [1]

> мне нужно сделать условие, если например, текущая дата меньше
> той которую я ввожу, то происходит какое то условие.


procedure TForm1.DateTimePicker1Exit(Sender: TObject);
begin
 if DateTimePicker1.DateTime > Now then
   begin
     ShowMessage('DateTimePicker1.DateTime > Now');
     DateTimePicker1.SetFocus;
   end;
end;

---

Dennis I. Komarov   (2008-10-02 09:14:00) [2]

> Поросенок Винни-Пух ©   (02.10.08 09:11) [4]

Зачем подсказал? Пусть сам нашел бы...

---

Поросенок Винни-Пух   (2008-10-02 09:11:00) [3]

TDateTime = type Double;

---

Armond   (2008-10-02 09:10:00) [4]

> Что такое есть Дата?


02.10.2008

---

Dennis I. Komarov   (2008-10-02 09:06:00) [5]

Что такое есть Дата?

---

Sergey13   (2008-10-02 08:54:00) [6]

> [0] Armond ©   (02.10.08 08:50)
> Подскажите как сравнивать даты ?

Так же как и все остальное. <>=

---

Наверх