谁能告诉我有这样的函数！

Question

我想得到一个计算两个日期之间相差天数的函数（DELPHI自带的）。请各位大侠帮忙。

Answer 1

sdt,edt:TDateTime; sdt:=StrToDateTime('2004/12/01');
 edt:=StrToDateTime('2005/12/01');
 ShowMessage(currtostr(edt-sdt));

Answer 2

uses DateUtils
DaysBetween(d1,d2);

Answer 3

DaysBetween有一个问题就是，它就只是告诉你差多少天，怎么差的，早多多少天，还是晚多少天，它不会告诉你。
比如:
DaysBetween(edt,sdt);{Result:=365}
DaysBetween(sdt,edt);{Result:=365}
看具体应用而选择。