2012-10-23 15 views
5

Mins, Saniye:Fark, iki tarihsaat arasındaki farkı almak ve hh olarak dize görüntülemek çalışıyorum

örnek dakikada mm'lik anda

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

veritabanı depolar (0,39)

sonra dize biçimi hh bunu veritabanından alıp göstermek istiyorum

: DateUtils yılında

+6

Veritabanınızda gerçekten 'mins' alanına ihtiyacınız var mı? 'vstart' ve' vend' alanları zaten aralarında aradaki farkı döndürmek için gereken tüm bilgileri içerir (ihtiyacınız olan formatta). – teran

cevap

13

bir functio mm var n MinutesBetween hangi şekilde kullanılabilir:

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