Ver Mensaje Individual
  #2  
Antiguo 13-06-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 26
seoane Va por buen camino
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.
Responder Con Cita