如何用DELPHI当前日期减五十天

Posted 2023-05-05

如何用delphi当前日期减五十天后，得到前五十天的日期

参考技术A var
DT: TDate;//定义变数DT为日期型
begin
DT:= Now(); //取得当前日期
DT:= Now()-50;//当前日期减50天
ShowMessage(DateToStr(DT));//显示得到的日期
end; 参考技术B 日期本身就是可以加减的，直接 date - 50 就是了。date是你的日期类型 参考技术C delphi中的日期类型类似于double类型，直接加就可以了，1代表一天
1/4代表6个小时 参考技术D var
nowDate:Tdatetime;
newDate:Tdatetime;
begin
nowDate:=date; //取当期日期
newDate:= nowDate-50;
showmessage ( formatedatetime('YYYY-MM-DD',newdate) );
end; 第5个回答  2011-06-18 DateUtils
function IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime;

如何用java比较两个时间或日期的大小

参考技术A 首先
按照一定的格式输入两个日期的字符串
然后用simpledateformat类转换成date实例date1,
date2
然后
calendar
cal1
=
calendar.getinstance();
calendar
cal2
=
calendar.getinstance();
cal1.settime(date1);
cal2.settime(date2);
这样你就有了两个表示所输入日期的calendar实例了
calendar可以做很多事
比如用cal1.after(cal2)或者cal1.before(cal2)或者cal1.equals(cal2)或者cal1.compareto(cal2)来比较两个日期时间先后
比如cal.get(calendar.year)可以得到表示该日期年份的整数
同理cal.get(calendar.month)可以得到月份
甚至可以用cal.gettimeinmillis()得到表示该日期的毫秒数
有了这些方法，简单的计算之后就可以得到需要的相差的信息
如果楼主是来求现成的源代码的-
-
我没有