请教: 如何求两个日期之间的天数? ( 积分: 1 )

jshykj00 · 2005-04-22

var
a, b: Date;
c: integer;
begin
a := 2005-10-1;
b := 2005-10-9;
c:= b - a;
showmessage(inttostr(c));
end;

//结果不是想的那样,这是为什么?有什么简单易行的办法吗?谢谢!

jshykj00 · 2005-04-22

var
a, b: Date;
c: integer;
begin
a := 2005-10-1;
b := 2005-10-9;
c:= b - a;
showmessage(inttostr(c));
end;

//结果不是想的那样,这是为什么?有什么简单易行的办法吗?谢谢!

delphibbs_Lee · 2005-04-22

用decodedate。然后自己将年月日加起来

大车 · 2005-04-22

var
a, b: Date;
c: integer;
begin
a := 2005-10-1;
b := 2005-10-9;
c:= trunc(b - a);
showmessage(inttostr(c));
end;

gzgzlxg · 2005-04-22

TDateTime类型整数部分表示天，小数部分表示时分秒。
去掉小数，两个TDateTime类型的日期相减就得到天数。

chenpeng9581 · 2005-04-22

同意"大车"的

jshykj00 · 2005-04-23

接受答案了.