关于SecondBetween这个函数!

Question

我用这个函数算出来的结果怎么会差1秒呢?
d1,d2:TdateTime;
sec:integer;
d1:=strToTime('09:17:00');
d2:=strToTime('09:20:00');
sec:=secondsBetween(d2,d1); 
showmessage(inttostr(sec));
结果应该是180秒嘛,为什么算出来的却是179秒呢?

Answer 1

我试了也是这么多，为什么呢，TO：gxgyj(杰克.逊_Discovery)

Answer 2

我靠，楼主真厉害，这样也可以试出来，BUG.还不知道有多少bug呢

Answer 3

刚才看了一下源程序
secondsbetween(d1,d2)相当于Trunc(SecsPerDay * (d2-d1))而TdateTime是double所以他算出来的
SecsPerDay * (d2-d1)等于179.99然后trunc 就得到179秒

Answer 4

楼主可以用MilliSecondsBetween试一下