Código Delphi [-] Var Horas : Double; Begin Horas := dtpHoraFinal.DateTime - dtpHoraInicio.DateTime; ShowMessage(Format('Las horas transcurridas (en decimal) son: %5.3d', [Horas * 24])); //mostrará 3.5 horas para 3:30, 10.3333 para 10:20, etc.
Var Horas : Double; Begin Horas := dtpHoraFinal.DateTime - dtpHoraInicio.DateTime; ShowMessage(Format('Las horas transcurridas (en decimal) son: %5.3d', [Horas * 24])); //mostrará 3.5 horas para 3:30, 10.3333 para 10:20, etc.