卷 卷起千堆雪tyn Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-05 #2 var StartTime, StopTime, Difference : TDateTime; begin Difference := StopTime - StartTime; end;
H hnzqw Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-05 #3 两个日期相减并不是一个天数,我想得到如: 01-10-5 与01-6-5相差的天数 有这个函数吗?
G GZCYP Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-05 #4 卷起千堆雪兄所说不错,只是hnzqwi没有了解TDateTime类罢了。 其实TDateTime实质为Double,所以两日期相减必为相差天数。 借卷起千堆雪兄代码,修改如下: var StartTime, StopTime, Difference : TDateTime; begin Difference := StopTime - StartTime; ShowMessage(FloatToStr(Difference)); //显示相差天数 end
卷起千堆雪兄所说不错,只是hnzqwi没有了解TDateTime类罢了。 其实TDateTime实质为Double,所以两日期相减必为相差天数。 借卷起千堆雪兄代码,修改如下: var StartTime, StopTime, Difference : TDateTime; begin Difference := StopTime - StartTime; ShowMessage(FloatToStr(Difference)); //显示相差天数 end
Q qiandeng Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-05 #5 有时候,想这种简单问题自己多试试,看看帮助就行了