funcion duracion

[tango01]

hola gente, gracias de antemano por su ayuda.

tengo que calcular el tiempo transcurrido entre dos fechas y mostrarlo en formato leible para humanos.

ejemplo

entre '2004-12-15 12:00' y '2005-01-17 13:00' daria como resultado

1 Mes, 2 Días y 1 hora

es un calculo muy usado y supongo que debe existir .....

tengo esta funcion php, quizas alguien sepa traducirla.

function duration($duration) {

   $jours = floor(($duration/86400));
   $duration = $duration % 86400;
   $heures = floor(($duration/3600));
   $duration = $duration % 3600;
   $minutes = floor(($duration/60));
   $duration = $duration % 60;
  
   printf('%dj %02dh %02dmin',$jours,$heures,$minutes);

}

donde floor es como int y % es mod

el problema es que en delphi usar estos operadores entre si trae problemas de compatibilidad de tipos


saludos