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