2012年2月6日
当前日期时间加上指定日期时间
摘要： uses DateUtils;添加引用用函数IncMiliSecond, IncMinute, IncDay, IncMonth, IncYear, IncWeek等实现当前日期时间加上指定日期时间如svalidate.Date:=incyear(date,3);表示在当前日期上加上3年 阅读全文
posted @ 2012-02-06 13:25 Unique.Y 阅读(513) 评论(0) 推荐(0) 编辑
Delphi 时间函数全集
摘要： function StartOfTheYear(const AValue: TDateTime): TDateTime;function EndOfTheYear(const AValue: TDateTime): TDateTime;function StartOfAYear(const AYear: Word): TDateTime;function EndOfAYear(const AYear: Word): TDateTime;function StartOfTheMonth(const AValue: TDateTime): TDateTime;function EndOfTheMo 阅读全文
posted @ 2012-02-06 12:22 Unique.Y 阅读(5374) 评论(0) 推荐(0) 编辑