365文库
登录
注册
福利来袭，限时免费在线编辑
转Pdf
下载我编辑的
下载原始文档
收藏
失心病
上传于：2024-07-16
delphi日期函数、日期加减
2008-02-29 09:12
Delphi里有现成的函数可以实现日期加减，是在DateUtils单元里的。
function IncYear(const AValue: TDateTime;const ANumberOfYears: Integer = 1): TDateTime;
// function IncMonth is in SysUtils
function IncWeek(const AValue: TDateTime;const ANumberOfWeeks: Integer = 1): TDateTime;
function IncDay(const AValue: TDateTime;const ANumberOfDays: Integer = 1): TDateTime;
function IncHour(const AValue: TDateTime;const ANumberOfHours: Int64 = 1): TDateTime;
function IncMinute(const AValue: TDateTime;c