请问怎么获得两个日期相减的天数

westhillchen 2003-05-21 09:23:14
万分感谢
...全文
63 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
tongki 2003-05-21
  • 打赏
  • 举报
回复
我也是。。。
lf43 2003-05-21
  • 打赏
  • 举报
回复
来晚了
myling 2003-05-21
  • 打赏
  • 举报
回复
呵呵,楼上的,什么时候升星了?也不开贴散分?
firetoucher 2003-05-21
  • 打赏
  • 举报
回复
直接两个tdatetime相减去整数就是相差的天数,至于为什么,欧口水都说干了,看看以前的帖子把。。。。
tDateTime = Float
pingshx 2003-05-21
  • 打赏
  • 举报
回复
trunc(datetimepicker1.datetime-datetimepicker2.datetime);
shengs 2003-05-21
  • 打赏
  • 举报
回复
介绍一个日期函数
select datediff(day,'2002-1-3 20:00','2002-1-5 21:00')
如果hour,second也可以。

easyboot 2003-05-21
  • 打赏
  • 举报
回复
用日期直接相减就可以了
rustle 2003-05-21
  • 打赏
  • 举报
回复
var
a, b: TDateTime;
begin
a := StrToDateTime('2002-1-3 20:00');
b := StrToDateTime('2002-1-5 21:00');
ShowMessage(FloatToStr(b-a));
end;

整数部分就可以了
killlaoli 2003-05-21
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var
date1, date2: TDate;
begin
date1 := strtodate('2003-5-20');
date2 := strtodate('2003-5-21');
Caption := floattostr(date2 - date1);
end;
GreenWaterBlueSky 2003-05-21
  • 打赏
  • 举报
回复
var
a,b:TDate;
begin
int(a-b)
end;
yutaocool 2003-05-21
  • 打赏
  • 举报
回复
用日期直接相减就可以了
lincanwen 2003-05-21
  • 打赏
  • 举报
回复
引用dateutils单元
用函数DaysBetween

5,379

社区成员

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

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