MonthsBetween2
简述
对月数:今天到下个月的今天(不包括)算一个完整月度,即一个对月。
MonthsBetween2(ANow:TDateTime;AThen:TDateTime):real
| 名称 | 类型 | 说明 |
|---|
| ANow | TDateTime | 日期, |
| AThen | TDateTime | 日期, |
| 返回 | real | 返回参数ANow和参数AThen之间的相距的对月数。 |
//返回2025-3-10到2026-2-4的对月数,,=10+(31-10)/31+(4-1)/28
BegT:=20250310T;
EndT:=20260204T;
return MonthsBetween2(begT,endT);
//结果:10.7845622119816