如何计算半天工作时间(50分)

N

netskyzyh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #1

我在一书上看到一个这样的例子：
TIME1,TIME2,time3:TDatetime;
time3:=(time2-time1)*24
书上说是用来计算半天的时间，可我一直都没能看懂，为会么要乘以24呢？请高手告知，谢
谢。

 

H

hardware007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #2

似乎是有问题

 

Z

zhangzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #3

说的问题太粗了。

 

君

君

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #4

应是除以24吧

 

X

xianguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #5

两个时间的差返回的是天数(实数)

 

A

app2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #6

TIME1,TIME2,time3:TDatetime;
TIME1:= Now;
while Now > TIME1 + 1* (1/24/60) then
begin
//这样就循环一分钟
end;
你上面那样似乎还因该有前提的吧？？

 

无

无头骑士

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #7

我也觉得是除以24

 

黑

黑星星

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #8

TIME1,TIME2,time3:TDatetime;
？？其中time3是你加的吧？time3如果是TDateTime型，下面这句语法就错了
time3:=(time2-time1)*24
是Double型还差不多；2个TDateTime类型变量相减，结果就是2个日期相差的天数，但是可以有小数，比如结果是1.5就表示2个日期相差1天半

 

L

lichdr

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-02

• #9

應該是得到兩個時間之間的小時數。
如黑星星所分析。

 

N

netskyzyh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-03

• #10

我漏了一个函数ROUND,正确应为:time3:=round(time2-time1)*24

 

J

jackchin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-03

• #11

两个TDateTime类型相减, 结果是:
整数部分, 天数
小数部分, 一天的分数 (例如 0.5是半天, 1/24是一小时)