Simplemente algo asi:
a minutos1 y 2 los cargo: minutos1:=(date);
Código Delphi
[-]
var horas,minutos,minutosTotales: Int64; momento1,momento2:Tdatetime;
minutosTotales :=MinutesBetween(momento1, momento2);
horas :=minutosTotales div 60;
minutos:= minutosTotales mod 60;
showmessage('Tiempo a Computar: '+inttostr(horas)+' Horas '+inttostr(minutos)+' Minutos');
el error viene cuando tomo por ejemplo: momento1 con la hora en am/pm y momento2 con el otro formato de hora. el calculo es incorrecto. por ejemplo se confunde las 22:00 hs con las 10:00 hs!
gracias!!!