Форум: "Основная";
Текущий архив: 2004.01.05;
Скачать: [xml.tar.bz2];
ВнизПомогите посчитать часы Найти похожие ветки
← →
ruslan_as (2003-12-15 11:51) [0]Есть две даты: "01.12.2003 12:00:00" и "04.12.2003 8:00:00".
Как посчитать количество часов между этими датами?
Вопрос конечно не сложный, но разобраться не могу.
Заранее спасибо всем, кто поможет...
← →
Anatoly Podgoretsky (2003-12-15 11:52) [1]В сутках 24 часа!
← →
ruslan_as (2003-12-15 11:57) [2]>>Anatoly Podgoretsky
Это я где-то читал...
А если серьезно то какими функциями получить эту разницу. Когда я делаю так
IntTMP:=DM.QWORKDATEEND.AsDateTime-DM.QWORKDATEBEGIN.AsDateTime;
ShowMessage(TimeToStr(IntTMP));
То у меня на экране 20:00:00.
← →
Anatoly Podgoretsky (2003-12-15 11:59) [3]Операция умножения (*) тебе нужна
← →
ruslan_as (2003-12-15 12:08) [4]??? Отдельно считать даты, потом умножать на 24, а потом отдельно время считать?
← →
Anatoly Podgoretsky (2003-12-15 12:10) [5]В школу в третий класс, там проходят преобразование из одних единиц измерения в другие.
← →
Плохиш_ (2003-12-15 12:10) [6]>ruslan_as © (15.12.03 11:57) [2]
Будешь удивлён HoursBetween
← →
Silver Alex (2003-12-15 12:16) [7]HourSpan
← →
Erik (2003-12-15 12:17) [8](Trunc(DM.QWORKDATEEND.AsDateTime)-Trunc(DM.QWORKDATEBEGIN.AsDateTime))*24
Все. Результат Integer
← →
ruslan_as (2003-12-15 12:18) [9]>>Плохиш_
Спасибо! А минуты это MinutesBetween...
← →
Плохиш_ (2003-12-15 12:24) [10]>ruslan_as © (15.12.03 12:18) [9]
А F1?
← →
ALEIIIKA (2003-12-18 15:14) [11]var
T1,T2 : Double;
begin
T1 := StrToDateTime("01.12.2003 12:00:00");
T2 := StrToDateTime("04.12.2003 8:00:00");
T2 := T2-T1;
T2 := Round(T2*24);
end;
← →
Amoeba (2003-12-18 16:01) [12]Скачай библиотеку ф-й для работы с временем и датами ESBDates
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.01.05;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.016 c