时间的计算问题！

Question

我要计算两个时间的差值应该怎么做啊？
比如说是10:31:02 和 9:45:34的差值，结果是多少时间。
各位大侠帮帮忙，先谢了！

Answer 1

strtodatetime转换成时间类型（浮点数），再相减得到的结果是以天为单位。

Answer 2

uses DateUtils
/////////////////////
function YearsBetween(const ANow, AThen: TDateTime): Integer;
function MonthsBetween(const ANow, AThen: TDateTime): Integer;
function WeeksBetween(const ANow, AThen: TDateTime): Integer;
function DaysBetween(const ANow, AThen: TDateTime): Integer;
function HoursBetween(const ANow, AThen: TDateTime): Int64;
function MinutesBetween(const ANow, AThen: TDateTime): Int64;
function SecondsBetween(const ANow, AThen: TDateTime): Int64;
function MilliSecondsBetween(const ANow, AThen: TDateTime): Int64;