我的数据库中有期限字段,格式是200705,如果加上几个月,然后改变它的值 ( 积分: 50 )

  • 主题发起人 主题发起人 yorkjj
  • 开始时间 开始时间
Y

yorkjj

Unregistered / Unconfirmed
GUEST, unregistred user!
比如说现在是200705如果我加上12就变成了200805
或者加上2就变成了200707
 
dateadd(month,12,year_month_no);
dateadd(month,2,year_month_no);
 
function StrIncMonth(ID: string; NumberOfMonths: word): string;
var
year,month: word;
aDate: TDate;
begin
year:=strtoint(copy(ID,1,4));
month:=strtoint(copy(ID,5,2));
aDate:=EncodeDate(year,month,1);
aDate:=IncMonth(aDate, NumberOfMonths);
result:=FormatDateTime('YYYYMM', aDate);
end;
 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
916
SUNSTONE的Delphi笔记
S
后退
顶部