[阅读: 426] 2005-07-07 08:01:41
DATA: daytime1(15) TYPE C,
daytime2(15) TYPE C,
day1 TYPE D,
day2 TYPE D,
days TYPE D,
time1 TYPE T,
time2 TYPE T,
times TYPE T.
daytime1 = A.
daytime2 = B.
day1 = daytime1+0(8).
day2 = daytime2+0(8).
days = day1 - day2.
time1 = daytime1+8(4).
time2 = daytime2+8(4).
times = time1 - time2.
最终结果 = days * 24 * 60 + CEIL( times / 60 )
我们总是怀着失望去回忆过去的希望,直到我们能BT的面对希望。直到遗忘。
blog:
http://blog.codelphi.com/fogbound
现在的
blog
==============================