delphi – 以小时,分钟,秒为单位的日期时间之间的差异

发布时间：2020-12-15 04:15:37 所属栏目：大数据来源：网络整理

导读：我试图得到两个日期时间之间的差异,并将其显示为字符串为hh：mm q.parambyname('vstart').asdatetime:= vstart;q.parambyname('vend').asdatetime:= vend;d:= vend-vstart;mins:= d * 1440;q.ParamByName('mins').asBCD:= mins; 目前数据库以分钟为单位存储

我试图得到两个日期时间之间的差异,并将其显示为字符串为hh：mm

q.parambyname('vstart').asdatetime:=  vstart;
q.parambyname('vend').asdatetime:= vend;
d:= vend-vstart;
mins:= d * 1440;
q.ParamByName('mins').asBCD:= mins;

目前数据库以分钟为单位存储它

例子(0.39)

我想从数据库中取出它并以字符串格式hh：mm显示它

解决方法

在DateUtils中有一个MinutesBetween函数,可以这样使用：

m := MinutesBetween(vend,vstart);
yourHMStr := Format('%2.2d:%2.2d',[m div 60,m mod 60]);

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!