简单问题 - 日期类型

[zhuangbx220]

就象在VB中的一样:
d=#1/1/1900# 'd为日期型

还有日期的运算：
i=date-d 'i为整形

i=#1/5/1900# - #1/1/1900# 'i 结果为4

在DELPHI中怎么输入日期类型和日期的加减运算得出天数？

[waysoft]

相同，直接减就行了

[zhuangbx220]

错误啦


类型不一样噢

[东八泰]

要先把日期字符串转换成日期类型（其实就是一个double类型），要计算天数可以把日期类型舍去小数，用整数部分相减就可以了。

[waysoft]

zhuangbx220(星) ( ) 信誉：100 2003-07-24 23:56:00 得分:0
错误啦
类型不一样噢

什么类型不一样？两个日期相减就是天数 ，如果有小数取整。

[zhuangbx220]

谢谢大家，最后用DaysBetween搞定,在DateUtils中定义

function DaysBetween(const ANow, AThen: TDateTime): Integer;


i:=DaysBetween(date,1901-1-1);