DecodeDateFully
简述
将参数指定的TDateTime类型时间DateTime的年、月、日以及星期几的信息分别存到参数Year,Month,Day，DOW中。如果是闰年，返回真，否则返回假。如果是公元前的年份，则所有参数返回0
DecodeDateFully(DateTime: TDateTime; var Year; Month; Day;DOW: Integer): Boolean;
| 名称 | 类型 | 说明 |
|---|
| DateTime | TDateTime | TDateTime类型，日期时间 |
| Year | Integer | 整数，年，输出值 |
| Month | Integer | 整数，月，输出值 |
| Day | Integer | 整数，日，输出值 |
| DOW | Integer | 整数，星期，输出值；结果和DayOfWeek一致，非ISO8601标准。1-7,星期天为1，星期六为7 |
| 返回 | Boolean |
布尔值，1表示闰年，0表示平年 |
Flag:=DecodeDateFully(inttodate(20140115),year,month,day,dow);
fname:=ifthen(1,'闰年','平年');
return array(year,month,day,dow,fname);
//返回：array(2014,1,15,4,'闰年')
TDateTime EncodeDate DecodeTime EncodeTime TryEncodeDate TryEncodeTime DecodeDate