pasar milisegundos a formato de fecha

[[seoane]]

Bueno, teniendo en cuenta que una variable de timpo TDateTime lo que almacena son dias trasncurridos a partir de una fecha, podriamos hacer algo asi:

Código Delphi [-]
function msToDateTime(ms: int64): TDateTime;
begin
  Result:= ms / (1000*60*60*24);
end;

Aunque ambos pueden empezar a contar desde momentos diferentes así que puede que tengas que hacer algo como esto:

Código Delphi [-]
function msToDateTime(ms: int64): TDateTime;
begin
  Result:= Correcion + (ms / (1000*60*60*24));
end;

Donde corrección es una fecha que puedes averiguar fácilmente sabiendo la fecha a la que corresponde un cierto número de milisegundos.