菜鸟的日期差值问题---在线等(帮个忙了)

syf10 2002-05-21 03:32:06
在我程序中,定义AA与BB都是TDATATIME型变量 AA,BB都读取不同的日期
列如AA:=2001-3-19;BB:=2001-3-29;我要通过程序计算出BB与AA之间相差的天数(应该是10天)。
我是用BB-AA,再把差值赋给一个EDIT框,EDIT.TEXT:=DATETOSTR(BB-AA);但结果明显不对,愿各位大侠指正
...全文
33 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
cndebug 2002-05-21
  • 打赏
  • 举报
回复
StartDate:=DateTimePicker1.date;
EndDate:=DateTimePicker2.date;
edit1.text:=floattostr(round(enddate-startdate));
Delphi_Li 2002-05-21
  • 打赏
  • 举报
回复
Edit.Text := IntToStr( Trunc( AA ) - Trunc( BB ) )
dreamfan 2002-05-21
  • 打赏
  • 举报
回复
同意阿冲的
s_x_d 2002-05-21
  • 打赏
  • 举报
回复
edit.text:=inttostr((Trunc(aa.AsDateTime))-(trunc(bb.AsDateTime)));
tygh2000 2002-05-21
  • 打赏
  • 举报
回复
1. edit1.Text :=inttostr(round(strtodate('2002-5-9')-strtodate('2002-4-8')));
2.edit1.Text :=inttostr(trunc(strtodate('2002-5-9')-strtodate('2002-4-8')));
Liujc 2002-05-21
  • 打赏
  • 举报
回复
uses DateUtils;

Edit.text := Inttostr(DaysBetween(bb,aa));
Delphi_Li 2002-05-21
  • 打赏
  • 举报
回复
日期相减,整数部分是日期差,也就是你要的内容,小书部分代表时间差,单位是秒!

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧