RecodeDate
简述
将参数Ayear、Amonth、Aday分别指定年份、月份、日期替换掉参数AValue中的相应的年份、月份、日期信息,保留时间信息,得到的日期时间类型返回
RecodeDate(AValue: TDateTime; AYear; AMonth; ADay: Integer): TDateTime;
名称 | 类型 | 说明 |
---|
AValue | TDateTime | 日期时间类型,日期时间 |
AYear | Integer | 整数,年份,定义域[0,9999] |
AMonth | Integer | 整数,月份,定义域[0,12] |
ADay | Integer | 整数,日期,定义域[0,31],并且要使Ayear、Amonth、Aday组成的时间有效 |
返回 | TDateTime |
日期时间 |
newTime:=RecodeDate(strtodatetime("2011-08-10 12:12:12"),2010,8,9);
return datetimetostr(newTime); //输出: 2010-08-09 12:12:12
TDateTime