跳楼价发问!!!!(5分)

  • 主题发起人 主题发起人 walala
  • 开始时间 开始时间
W

walala

Unregistered / Unconfirmed
GUEST, unregistred user!
有没有给出两个日期而返回中间天数得函数?
 
好象有,自己找一下。
 
1,date3:=date1-date2<br>2,timestamp:=datetimetotimestamp(date3)<br>3,timestamp中的date属性经差数处理为date1,date2的中间天数
 
如果你的两个变量都是日期型的, 那么直接相减即可, 如果是时间日期型的, 则用两<br>个变量的整数部分相减。Delphi的时间日期型变量的整数部分表示天数,小数部分表<br>示时间。
 
StrtoDate函数可以将字符串转化成时间类型。相应的还有其他函数自己看看帮助。日期型数据内部表示为一个实数,可以进行加减运算。很好用的
 
根据huizhang的方法,自己写一个函数也很容易.<br>function......
 
这问题早该结束了,我来总结一下吧,(为了这5分?!:-)<br>&nbsp; &nbsp; 你的日期只可能有三种类型:TDate,TDateTime,String;<br>&nbsp; &nbsp;1. 对于TDate,TDateTime类型 ,使用:<br>&nbsp; &nbsp; &nbsp;var timespan :integer;<br>&nbsp; &nbsp; &nbsp;timespan := trunc(DateEnd-Datebegin);<br>&nbsp; &nbsp;2. 对于String类型,使用<br>&nbsp; &nbsp; &nbsp;try<br>&nbsp; &nbsp; &nbsp; &nbsp;timespan := trunc(strtodate(DateEnd)-strtodate(Datebegin));<br>&nbsp; &nbsp; &nbsp;except<br>&nbsp; &nbsp; &nbsp; &nbsp;on E: EConvertError do<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ShowMessage('字符串无法正确转化为日期!');<br>&nbsp;
 
sorry,一个小问题就有这么多人回答。早知道就多给几分了。实在不好意思。在这里谢谢大家了。
 
多人接受答案了。
 
后退
顶部