求教，如何求出两个给定日期之间相差的天数？？

Question

delphi有没有相应的函数，如果没有该怎吗写，谢谢！！

Answer 1

在Delphi/BCB里直接相减就可以了，在SQL SERVER要用函数DateDiff！

Answer 2

var
  ii :Integer;
  Date1,Date2 :TDateTime;
begin
  Date1 := StrToDateTime('2001-11-08 00:00:00');  //注意两天的时间
  Date2 := StrToDateTime('2001-11-09 00:00:00');
  ii := ROUND(Date2 - Date1);  //得到相隔的天数
end;