delphi 中实现当期日期 减去 若干小时的方法

假定当期日期为：2011-08-01 15:00:00

now - 1      ：代表前一天的日期 返回值：2011-07-31 15:00:00

now - 1/3   ：代表8小时前          返回值：2011-08-01 07:00:00

now - 1/12 ：代表2小时前         返回值：2011-08-01 13:00:00

now - 1/24 ：代表1小时前         返回值：2011-08-01 14:00:00
---------------------
作者：北环阳光
来源：CSDN
原文：https://blog.csdn.net/lotusyangjun/article/details/6650955
版权声明：本文为博主原创文章，转载请附上博文链接！