Question

请教delphi中用FormatdateTime得到的时间怎样求时间差？

我想用Edit1.text:=FormatdateTime('yyyy年mm月dd日hh时nn分', Now())；取得的时间和数据库中原来用同样的方法取得的时间做比较求小时差。
对不起,我没说清楚.是Edit1.text里的时间可以提供给用户修改,然后和求得的时间差都要保存到数据库.如果不行不用FormatdateTime用其它方法得到系统时间达到同样的功能也行.麻烦了!

Answer 1

FormatdateTime这个函数的后面的参数直接可以是时间差，Edit1.text:=FormatdateTime('yyyy年mm月dd日hh时nn分', Now()-TimeFromDatabase)；
TimeFromDatabase为数据库中取得的时间，也是TDatetime类型的变量，就可以了

Answer 2

其实Delphi中有个DateUtils单元,你在接口部分引用下.
其中有个函数 HoursBetween 即可计算两个时间的间隔数.
函数原型:
function HoursBetween(const ANow, AThen: TDateTime): Int64;
begin
Result := Trunc(HourSpan(ANow, AThen));
end;