请问：如何根据当前时间和时间段得到另一个时间？

Question

请问如何得到距当前时间相差某一时间段的时间？
如当前时间为2004-8-1 18：00：00
如何得到距当前时间前10秒钟的时间值？（应该是2004-8-1 17：59：50）
如何得到距当前时间前12分钟的时间值？（应该是2004-8-1 17：48：00）
如何得到距当前时间前6小时的时间值？（应该是2004-8-1 12：00：00）
请问可以使用某一个通用函数吗？
多谢！

Answer 1

uses DateUtils;function IncSecond(const AValue: TDateTime; const ANumberOfSeconds: Int64 = 1): TDateTime;function IncMinute(const AValue: TDateTime; const ANumberOfMinutes: Int64 = 1): TDateTime;function IncHour(const AValue: TDateTime; const ANumberOfHours: Int64 = 1): TDateTime;

Answer 2

前的, 就是為負數, 用 -12, -XX 代入就是!>>请问可以使用某一个通用函数吗？
function IncSecond(const AValue: TDateTime; const ANumberOfSeconds: Int64 = 1): TDateTime;將小時, 分鐘的化為秒就可用一個 IncSecond 解決

Answer 3

aiirii(ari-爱的眼睛)  说的是.

Answer 4

1 为 1 天
1 小时 = 1 / 24
1 分钟 = 1 / (24 * 60)
1 秒 = 1 / (24 * 60 * 60)1、now - 10 /(24 * 60 * 60)
2、now - 12 / (24 * 60)
3、now - 6 / 24

Answer 5

http://soft.56kc.com/Filedown.aspx?FID=223

Answer 6

http://soft.56kc.com/Filedown.aspx?FID=198