Форум: "Основная";
Текущий архив: 2005.01.09;
Скачать: [xml.tar.bz2];

Вниз

Работа с датами   Найти похожие ветки 

← →
Mate_ru   (2004-12-20 16:12) [0]

Как узнать разницу в днях между двумя датами?

---

← →
Плохиш ©   (2004-12-20 16:17) [1]

-

PS. Мелчают студенты :-((

---

← →
Кабан   (2004-12-20 16:17) [2]

никогда этот вопрос не умрет!!!
A-B

---

← →
Александр Иванов ©   (2004-12-20 16:18) [3]

DaysBetween
Date2-Date1

---

← →
Mate_ru   (2004-12-20 16:27) [4]

Мне надо узнать количество дней не в формате даты, а обычным числом.

--------------------------------------------------------------------------------
Александр Иванов ©   (20.12.04 16:18) [3]
DaysBetween
Date2-Date1


Что-то у меня эта процеруда не пашет.

---

← →
Mate_ru   (2004-12-20 16:30) [5]

Извиняюсь за описку - процедура  DaysBetween

---

← →
begin...end ©   (2004-12-20 16:33) [6]

> [4] Mate_ru   (20.12.04 16:27)

var
 Date1, Date2: TDateTime;
 Days: Double;

begin
 Days := Date2 - Date1;
 ShowMessageFmt("Разница составляет %f.2 дней", [Days])
end.

> Что-то у меня эта процеруда не пашет.

Включите модуль DateUtils в список uses.

---

← →
Johnmen ©   (2004-12-20 16:33) [7]

про формат даты - TDateTime+F1

---

← →
Рамиль ©   (2004-12-20 16:34) [8]

Mate_ru   (20.12.04 16:27) [4]
Мне надо узнать количество дней не в формате даты, а обычным числом.
Трудно глянуть справку по TDateTime?

---

← →
ssk ©   (2004-12-20 16:34) [9]

uses DateUtils

---

← →
begin...end ©   (2004-12-20 16:36) [10]

Приношу извинения: в [6] нужно не %f.2, а %.2f.

---

← →
Reindeer Moss Eater ©   (2004-12-20 16:43) [11]

http://delphimaster.net/view/1-1103201246/

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.01.09;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.48 MB
Время: 0.035 c