时间数据的比较,该怎么解决
时间数据的比较
var
OldTime, ChangeTimeA, ChangeTimeB, NowTime: TSystemTime;
begin
//获取到系统时间到vOldTime结构去
GetLocalTime(OldTime);
//现在如何把这个OldTime结构的时间加上100天得到一个新的结构赋值到ChangeTimeA去?
//
//然后在获取到当前的系统时间到去NowTime
GetLocalTime(NowTime);
//最后如何比较ChangeTimeA时间是否大于NowTime当前时间
//
//总体就是比较时间,不要用delphi封装的哪些函数比较。
end;
不要用系统封装的时间单元
------解决方案--------------------
这样玩吧:
GetLocalTime(OldTime);
CopyMemory(@ChangeTimeA,@OldTime,SizeOf(ChangeTimeA));
ShowMessage(IntToStr(ChangeTimeA.wDay));
ChangeTimeA.wDay :=ChangeTimeA.wDay+100;
ShowMessage(IntToStr(ChangeTimeA.wDay));
//通过计算闰年,算出每月多少天,将wDay进位。逢30,29,31等进位
//通过wMonth进位,大于12,进一年。
var
OldTime, ChangeTimeA, ChangeTimeB, NowTime: TSystemTime;
begin
//获取到系统时间到vOldTime结构去
GetLocalTime(OldTime);
//现在如何把这个OldTime结构的时间加上100天得到一个新的结构赋值到ChangeTimeA去?
//
//然后在获取到当前的系统时间到去NowTime
GetLocalTime(NowTime);
//最后如何比较ChangeTimeA时间是否大于NowTime当前时间
//
//总体就是比较时间,不要用delphi封装的哪些函数比较。
end;
不要用系统封装的时间单元
------解决方案--------------------
这样玩吧:
GetLocalTime(OldTime);
CopyMemory(@ChangeTimeA,@OldTime,SizeOf(ChangeTimeA));
ShowMessage(IntToStr(ChangeTimeA.wDay));
ChangeTimeA.wDay :=ChangeTimeA.wDay+100;
ShowMessage(IntToStr(ChangeTimeA.wDay));
//通过计算闰年,算出每月多少天,将wDay进位。逢30,29,31等进位
//通过wMonth进位,大于12,进一年。