Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Convertir de hora GMT a hora local (https://www.clubdelphi.com/foros/showthread.php?t=43648)

marceloalegre 16-05-2007 22:46:01

Convertir de hora GMT a hora local
 
Buenas tardes, estoy leyendo información desde un sistema remoto que me envia la hora GMT, estaría necesitando alguna forma de convertirla a la hora local... o por lo menos saber como hacerlo :confused: Gracias!!!!!

marcoszorrilla 16-05-2007 22:52:44

Aquí tienes información que te puede ser util.

Un Saludo.

seoane 16-05-2007 23:00:25

Y aquí tienes algo de código:

http://www.clubdelphi.com/foros/show...69&postcount=2

marceloalegre 16-05-2007 23:14:29

a ver esto...
 
Justo estaba por decir que para esto me base en una función hecha por Domingo :) ...

Código Delphi [-]
function convertirAGMT(const value:Tdatetime):TDateTime;
var
  tZone:TTimeZoneInformation;
begin
  //convertir la hora a gmt
  GetTimeZoneInformation(tZone);
  result:=IncMinute(value,tZone.Bias);
end;
function FechaHoraGMTaLocal(FechaHoraGMT:TDateTime):TDateTime;
var
  Info: TIME_ZONE_INFORMATION;
  Bias: TDateTime;
begin
  GetTimeZoneInformation(Info);
  Bias:= abs(Info.Bias) / 1440;
  if Info.Bias < 0 then
    result:= FechaHoraGMT + Bias
  else
    result:= FechaHoraGMT - Bias;
end;

Esta esto Correcto?

cHackAll 16-05-2007 23:35:58

Respuesta
 
Revisa éste link, y en todo caso te aconsejo que averigues un poco de la API "GetTimeZoneInformation"

Suerte!


La franja horaria es GMT +2. Ahora son las 19:54:58.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi