Главная страница
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.03 c
1-11981
ssk
2003-12-19 09:51
2004.01.05
Рисование из DLL на канве цветом


1-11922
P.N.P.
2003-12-20 20:54
2004.01.05
TserviceApplication


4-12210
h0use
2003-11-04 12:13
2004.01.05
Создать невидимую форму реально?


3-11813
vlgrig1961
2003-12-10 08:17
2004.01.05
Вопрос по TSession.GetTableNames в Oracle8


6-12009
bloodman
2003-11-04 21:13
2004.01.05
Есть ли коппоненты для работы с IPX , или подскажите (+)