|
|
TBool CompareDateTime(TInt ayear,TInt amonth,TInt aday) {
TTime CurrtTime; CurrtTime.HomeTime(); //当前时间
TDateTime aDateTime; aDateTime.Set ( ayear, TMonth(amonth), aday, 0, 0, 0, 0); //用参数构建一个时间
TTime BarTime(aDateTime); TTimeIntervalDays dayval =7; BarTime +=(dayval); //给构建的时间加7天.
if (CurrtTime >BarTime) { return ETrue; } return EFalse; } |
|
|
|