Date类型怎么么分别得出年月日
Date类型怎么么分别得出年月日,结果为三个值 问题点数:0、回复次数:8Top
1 楼aiirii(ari-http://spaces.msn.com/members/aiirii/)回复于 2003-11-02 10:28:59 得分 0
用 DecodeDate ;
var
Present: TDateTime;
Year, Month, Day, Hour, Min, Sec, MSec: Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
Label1.Caption := 'Today is Day ' + IntToStr(Day) + ' of Month '
+ IntToStr(Month) + ' of Year ' + IntToStr(Year);
DecodeTime(Present, Hour, Min, Sec, MSec);
Label2.Caption := 'The time is Minute ' + IntToStr(Min) + ' of Hour '
+ IntToStr(Hour);
end;Top
2 楼mysqlcom(飞天2003)回复于 2003-11-02 10:46:03 得分 0
yearOf(now)
monthOf(now)
dayOf(now)Top
3 楼txmjs(天地之间)回复于 2003-11-02 11:00:01 得分 0
var
year,month,day:string
begin
year:= formatDatetime('yyyy',now);
month:=FormatDateTime('mm',now);
day:=FormatDateTime('dd',now);
endTop
4 楼txmjs(天地之间)回复于 2003-11-02 11:00:34 得分 0
用我这个方法可以得到你想要的.Top
5 楼47522341(睡到8:30)回复于 2003-11-02 11:07:52 得分 0
var
yy,mm,dd: dword;
begin
decode(now,yy,mm,dd);
showmessage(inttostr(yy));
showmessage(inttostr(mm));
showmessage(inttostr(dd));
end;Top
6 楼karach(卡车)回复于 2003-11-02 11:41:05 得分 0
SQL 语句中用的!
year(字段)
month(字段)
day(字段)Top
7 楼ly_liuyang(Liu Yang LYSoft http://lysoft.7u7.net)回复于 2003-11-02 12:02:53 得分 0
DecodeDate最好了Top
8 楼hnhb(不死鸟)回复于 2003-11-02 16:01:09 得分 0
上面回答的人个个正确Top




