RecodeTime
简述
将参数Ayear、Amonth、Aday、AHour、AMinute、Asecond、AMilliSecond分别指定小时、分钟、秒钟、毫秒替换掉参数AValue中的相应的小时、分钟、秒钟、毫秒信息，保留日期信息，得到的日期时间类型返回
RecodeTime(AValue: TDateTime; AHour; AMinute; ASecond; AMilliSecond: Integer): TDateTime;
| 名称 | 类型 | 说明 |
|---|
| AValue | TDateTime | 日期时间类型，日期时间 |
| AHour | Integer | 整数，小时，定义域[0，24] |
| AMinute | Integer | 整数，分钟，定义域[0，59] |
| ASecond | Integer | 整数，秒钟，定义域[0，59] |
| AmilliSecond | Integer | 整数，毫秒，定义域[0，999] |
| 返回 | TDateTime |
日期时间 |
newTime:=RecodeTime(strtodatetime("2011-08-10 12:12:12.999"),10,8,9,100);
return datetimetostr(newTime);//输出: 2011-08-10 10:08:09
TDateTime