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

Вниз

Уважаемые Мастера!   Найти похожие ветки 

← →
DeNNiss   (2002-01-14 13:40) [0]

Такой вопрос: мне нужно получить количество часов между заданными датами, например между 01.01.02 15:00 и 17.01.02 19:00. Как это сделать, что-то у меня переклинило, вопрос-то несложный. Заранее спасибо.

---

← →
SergVlad   (2002-01-14 14:08) [1]

"Зри в корень"

TDateTime - это double тип.
Целая часть - число суток
Дробная - часть одних суток
Вычитая из большей даты меньшую получаешь разницу в днях и части дня: Delta.

Число часов = int(Delta*24)

---

← →
Vitaly   (2002-01-14 14:15) [2]

var t1, t2: TDateTime;
begin
t1 := StrToDateTime("01.01.2002 12:00");
t2 := StrToDateTime("01.01.2002 13:00");
caption := IntToStr( trunc(24*(t2-t1)) );
end;

Учти, что между этими датами еще 0 часов.

---

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

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

Наверх

Память: 0.53 MB
Время: 3.015 c