请教!应该有一些函数可以实现吧?

解决方案 »

  1.   

    两个时间类型相减的结果是浮点数了,用FloatToDateTime()吧
      

  2.   

    var
      a,b,c : TDateTime;  a:=......//赋值
      b:=......//赋值
      c:=a-b;
      

  3.   

    DaysBetweenUnit DateUtils
     function DaysBetween(const ANow, AThen: TDateTime): Integer;
      

  4.   

    var
      a,b: TDateTime;
      c: doublel;  a:=......//赋值
      b:=......//赋值
      c:=(a-b)*24*60;//(a-b)*24小时*60分钟
      

  5.   

    谢谢楼上!我刚才也用了这个方法,成功了!但却出现了一个问题:
     a:= 2003-12-3 09:50:00;
     b:= 2003-12-3 08:00:00;
     c:= FloatToStr((a-b)*24*60);
    c的结果应该是110,但奇怪的是结果是109.999999991851.最后没办法只好用了Round.
    请问这是怎么回事?