delphi 年月日自动加一减一函数,月加一,月减一
摘要:
月份减一月情况:functionGetLastMonth(ADate:TDateTime):TDateTime;vardwYear,dwMonth,dwDay:Word;beginResult:=ADate;TryDeCodeDate(ADate,dwYear,dwMonth,dwDay);Resu... 阅读全文
posted @ 2016-01-25 10:37 那里的天空 阅读(2415) 评论(0) 推荐(0) 编辑