两个TDateTime相减之后化为秒，在转化为Integer型 ( 积分: 100 )

D

dustyfly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #1

如题

 

D

dustyfly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #2

如题

 

Y

ybb507

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #3

时间是浮点型的，转化为整型恐怕时间就不准了

 

H

helloqiner

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #4

uses dateutils;
然后使用下面的函数
function SecondsBetween(const ANow, AThen: TDateTime): Int64;

 

G

gyh75

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #5

相减后得到的是天 再乘以24 × 3600 就是秒, 再取整

 

C

cctv6

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #6

顶一下吧

 

C

caihua

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #7

uses dateutils;

function SecondsBetween

 

A

Another_eYes

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-03

• #8

呵呵
round((date1-date2) * 86400)

 

D

dustyfly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-04

• #9

多人接受答案了。