简单问题 - 日期类型

Question

就象在VB中的一样:
d=#1/1/1900#  'd为日期型还有日期的运算：
i=date-d   'i为整形i=#1/5/1900# - #1/1/1900# 'i 结果为4在DELPHI中怎么输入日期类型和日期的加减运算得出天数？

Answer 1

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

Answer 2

zhuangbx220(星) ( ) 信誉：100  2003-07-24 23:56:00  得分:0 
  错误啦
  类型不一样噢什么类型不一样？两个日期相减就是天数 ，如果有小数取整。

Answer 3

谢谢大家，最后用DaysBetween搞定,在DateUtils中定义function DaysBetween(const ANow, AThen: TDateTime): Integer; 
 i:=DaysBetween(date,1901-1-1);