WithinPastWeeks

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

WithinPastWeeks

简述

判断时间ANow和时间AThen的时间间隔是否在AWeeks周内。
注意：由于函数用到了WeeksBetween函数，因此会舍去小数部分，所以，如果ANow和Athen相隔不足(N+1)*7天，那么WithinPastWeeks(Anow,Athen,N)返回真

定义

WithinPastWeeks(ANow; AThen: TDateTime; AWeeks: Integer): Boolean;

参数

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

范例

范例一：
//2011年1月1日至2011年1月28日之间的天数为27天，不足28天(4*7)，所以仍在3周内
flag:=WithinPastWeeks(strtodatetime('2011-01-01'),strtodatetime('2011-01-28'),3);
return flag; //输出: 1

范例二：
//2011年1月1日至2011年1月28日之间的天数为27天，不足28天(4*7)，所以仍在3周内
flag:=WithinPastWeeks(strtodatetime('2011-01-01'),strtodatetime('2011-01-29'),3);
return flag; //输出: 0
参考
TDateTime WithinPastYears WithinPastMonths WithinPastDays WithinPastHours WithinPastSeconds WithinPastMinutes WithinPastMilliSeconds

相关