RecodeMonth
简述
将参数AMonth指定的月份替换掉参数 AValue中的相应的月份信息,得到的TDateTime类型返回。
注意,如果出现替换月份后组成的日期为无效日期,函数将报错。如用4月替换3月31日的月份信息。
RecodeMonth(AValue: TDateTime; AMonth: Integer): TDateTime;
名称 | 类型 | 说明 |
---|
AValue | TDateTime | 日期类型,日期 |
AMonth | Integer | 整数,月份 |
返回 | TDateTime |
日期 |
范例一:
try
newTime:=RecodeMonth(strtodatetime("2011-08-10"),10);
newTime:=datetimetostr(newTime);
except
newTime:=0;
end;
return newTime; //输出: 2011-10-10
范例二:
try
newTime:=RecodeMonth(strtodatetime("2013-3-31"),4);
newTime:=datetimetostr(newTime);
except
newTime:=0;
end;
return newTime; //输出: 0
TDateTime