różnica między datetimes w godzinach, minutach, Sekund

Question

Próbuję uzyskać różnicę między dwoma datetimes i wyświetlić go w ciągu jako hh: mm

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

obecnie baza danych przechowuje go w minutach

przykład (0,39)

Chciałbym następnie zabrać go z bazy danych i wyświetlić go w formacie hh łańcuch: mm

Answer 1

w DateUtils jest funk n MinutesBetween, który może być używany jako taki:

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