WithinPastMonths
简述
判断时间ANow和时间AThen的时间间隔是否在Amonths月内。
注意:由于函数用到了MonthsBetween函数,这个函数考虑了月份不具有有相同的长度,基于一个每月有30.4375天的假设进行月份的统计,会舍去小数部分,所以,如果ANow和Athen相隔小于(N+1)*30.4375天,那么WithinPastMonths(Anow,Athen,N)返回真
WithinPastMonths(ANow; AThen: TDateTime; AMonths: Integer): Boolean;
名称 | 类型 | 说明 |
---|
ANow | TDateTime | 日期时间类型,查找时间 |
Athen | TDateTime | 日期时间类型,查找起始时间 |
AMonths | Integer | 整数,月份个数 |
返回 | Boolean |
布尔,1表示是,0表示否。 |