2012-10-23 129 views
5

我試圖得到兩個日期時間之間的差異,在字符串HH顯示它:毫米差異,分鐘,秒

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

+6

你真的需要數據庫中的'mins'字段嗎? 'vstart'和'vend'字段已經包含了所有需要返回查詢結果之間差異的信息(需要的格式)。 – teran

回答

13

DateUtils有一個函數的n MinutesBetween可以這樣使用:

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