Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.05;
Скачать: CL | DM;

Вниз

Помогите посчитать часы   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.027 c
3-11775
Сетевик
2003-12-09 15:50
2004.01.05
Кто нить писал когда нить свой SQL Trace ??


1-11859
lipskiy
2003-12-13 18:45
2004.01.05
Русский интерфейс в английских виндах?


1-11973
Марат
2003-12-19 05:59
2004.01.05
Использование F1


6-12013
xGhost
2003-11-04 08:50
2004.01.05
Обновление программы по сети


8-12008
xn0bys
2003-08-29 08:23
2004.01.05
Как создать на клиентской части формы БИТМАП (НЕ канву).