WithinPastYears

天软金融分析.NET函数大全 > TSL函数 > 基础函数 > 日期时间 > 范围判定函数

WithinPastYears

简述

判断时间ANow和时间AThen的时间间隔是否在Ayears年内。
注意：由于函数用到了YearsBetween函数，由于年份不具有相同的长度，例如闰年比非闰年长一天，所以函数的计算是基于一个每年有365.25天的假设进行，并且舍掉了小数尾数。因此会舍去小数部分，所以，如果ANow和Athen相隔不足N+1年，那么WithinPastYears(Anow,Athen,N)返回真

定义

WithinPastYears(ANow; AThen: TDateTime; AYears: Integer): Boolean;

参数

名称	类型	说明
ANow	TDateTime	日期时间类型，查找时间
Athen	TDateTime	日期时间类型，查找起始时间
AYears	Integer	整数，年份
返回	Boolean	布尔，1表示是，0表示否。

范例

范例一：

//2010年1月5日至2013年1月4日之间，不足3年，因此，判断为2年内
flag:=WithinPastYears(strtodatetime('2010-01-05'),strtodatetime('2013-01-04'),2);
return flag; //输出: 1

范例二：

////2010年1月5日至2013年1月5日之间，相隔 3年，因此，判断为不在2年内
flag:=WithinPastYears(strtodatetime('2010-01-05'),strtodatetime('2013-01-05'),2);
return flag; //输出: 0
参考
TDateTime WithinPastMonths WithinPastWeeks WithinPastDays WithinPastHours WithinPastSeconds WithinPastMinutes WithinPastMilliSeconds

WithinPastYears 复制链接

WithinPastYears