Convertir integer a formato de hora en un TTime.

[[duilioisola]]

¿Cuál es la relación de enteros por hora?
1 = 1 hora
60 = 1 hora
alguna otra

Una variable TDateTime es un número donde la parte entera son días y la parte decimal la parte del día

Por lo tanto, si 1 es 1 hora:
24 horas = 1 TDateTime
1 hora = 1/24 = 0.417 TDateTime

Código Delphi [-]
var
  Hora : integer;
  aTime : TDateTime;
begin
  Hora = 2;
  aTime := (1/24) * Hora;
  ShowMessage(TimeToStr(aTime))
end;