GetImageLinkTimeStamp liegt um eine Stunde daneben

[uligerhardt]

Wenn ich GetImageLinkTimeStamp aus der CodeLib so
  Caption:= DateTimeToStr(UnixToDateTime(GetImageLinkTimeStamp(Application.ExeName))); einbinde, bekomme ich momentan eine Stunde weniger angezeigt als hier. Was ist denn nun die richtige UTC-Zeit?

Oder liegt's an meiner Umrechnung in die lokale Zeit? Momentan rechne ich mir dt := UnixToDateTime(TimeStamp) - GetTimeZoneBias aus mit

Delphi-Quellcode:

function GetTimeZoneBias: TDateTime;
var
  tzi: TTimeZoneInformation;
begin
  case GetTimeZoneInformation(tzi) of
    TIME_ZONE_ID_STANDARD:
      Result := (tzi.Bias) / MinsPerDay;
    TIME_ZONE_ID_DAYLIGHT: // Sommerzeit
      Result := (tzi.Bias + tzi.DaylightBias) / MinsPerDay;
    else
      Result := 0.0;
  end;
end;

Und dt liegt momentan eben genau um eine Stunde daneben.

[Bummi]

ich weiß nicht ob 2007 das schon kennt

Delphi-Quellcode:

uses DateUtils;
  UniversalDateTime := TTimeZone.Local.ToUniversalTime(LocalDateTime);
  LocalDateTime := TTimeZone.Local.ToLocalTime(UniversalDateTime);

ansonsten hatte ich hier einmal eine Unit abgelegt.

[uligerhardt]

Zitat von Bummi:

ich weiß nicht ob 2007 das schon kennt

Delphi-Quellcode:

uses DateUtils;
  UniversalDateTime := TTimeZone.Local.ToUniversalTime(LocalDateTime);
  LocalDateTime := TTimeZone.Local.ToLocalTime(UniversalDateTime);

Gibt's in D2007 noch nicht.

Zitat von Bummi:

ansonsten hatte ich hier einmal eine Unit abgelegt.

Danke, schau ich mir morgen mal an.

Edit: Hab mal ein bisschen mit deinem Programm rumprobiert. Wenn ich alles richig verstanden habe, liefert es mir die gleiche UTC wie http://www.bipm.org/en/scientific/tai/time_server.html - soweit, so gut. Aber was liefert mir dann GetImageLinkTimeStamp?

Könnt ihr mal ausprobieren, was ihr rauskriegt?

[uligerhardt]

Der Vollständigkeit halber: Heute (also vermutlich seit der Sommerzeitumstellung ) stimmen die UTC von GetImageLinkTimeStamp und die vom BIPM (also vermutlich die offizielle) überein.