比如起始时间是2007-11-05 23:00
现在我加上2.5小时
时间就到了2007-11-06 01:30如何做到?

解决方案 »

  1.   

    Delphi有一个名为DateUtils的单元,里面封装好很多对日期操作的函数。
    要实现你想要的结果,可以使用其中的IncMinute函数:
    IncMinute(150); //2.5H=150m
      

  2.   

    少个参数,假设当前时间存在变量D中,
    D := IncMinute(D, 150);
      

  3.   

    delphi的Tdatetime的数据类型实际是一个实型
    可以进行加减的!
    var
    Mytime:Tdatetime;begin
      Mytime:=strtotime('2007-11-05   23:00 ');
      Mytime:=Mytime + 2.5/24;  //小时要除以24,它是以一天的几分之几来表示
      (DateTimetostr(Mytime));
    end;
      

  4.   

    上面代码误删了一部分,看这个var
    Mytime:Tdatetime;
    begin
      Mytime:=StrToDateTime('2007-11-05   23:00 ');
      Mytime:=Mytime + 2.5/24;
      showmessage(DateTimetostr(Mytime));
    end;用IncMinute也可以,麻烦了点
    uses DateUtils; //引用DateUtils
    var
    Mytime:Tdatetime;
    tt:int64;
    begin
      Mytime:=StrToDateTime('2007-11-05   23:00 ');
        tt:=trunc(2.5*60) ;
       IncMinute(Mytime,tt);
        showmessage(DateTimetostr(Mytime));
    end;
      

  5.   

    非常感觉各位兄弟的解答,特别是
    edongxu 和 chris_mao