简单的日期函数 问题(28)

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

Unregistered / Unconfirmed
GUEST, unregistred user!
vard: TDate;begin d := StrToDate('2009-11-11'); edit5.Text := datetostr(d+1);end;想取得d这个日期变量的的年份,月份,和日号,还有是星期几,有什么函数可以实现取得这些值
 
edit5.Text := IntToStr(DayOfTheyear(d)); edit5.Text := IntToStr(DayOf(d)); edit5.Text := IntToStr(monthOf(d)); edit5.Text := IntToStr(DayOfTheweek(d));自己回答了
 
好像是decodedatetime,或类似,手头没有ide,不能说出准确函数名,抱歉。
 
自己回答怎么结分啊.
 
dateutils都在这个单元里面
 
想着收获又不希望付出!才 20 分,随便找个人给了算啦,要是实在舍不得这 20 分,自己再建个帐号把分检回去吧!
 
后退
顶部