时间运算

'2008-01-09 10:20:30' 减/加 30 分钟    如何实现

解决方案 »

  1.   


    var
      dt:TDateTime;
    begin
      dt := IncMinute(Now,30);
      ShowMessage(DateTimeToStr(dt));
    end;
      

  2.   

    use DateUtils;function  IncMinute (const AValue: TDateTime; const ANumberOfMinute: Int64 = 1): TDateTime;
    例：IncMinute(now,-30);在NOW的基础上减30分钟。
      

  3.   

    运行时incminute(now,30)时报错
    我用delphi2006
      

  4.   

    undeclared identifier:'incminute'
      

  5.   

    use DateUtils; 
    包含这个单元文件