Zeitumrechnung möglich?

[nuclearping]

Zitat von Chriscode:

Vielen Dank für eure Antworten.

Leider hört sich das ganze relativ kompliziert und für mich als Anfänger nahezu nicht umsetzbar an.

Gibt es keine einfachere Möglichkeit? z.B. Datum und Zeit in einen Timestamp zu konvertieren und daraus die richtige Zeit holen?

LG,
Chris

Schau dir mal StrToDateTime / TryToStrDateTime an. Dazu das Gegenstück: FormatDateTime. Kann sein, dass ich jetzt was mit PHP verwechsel, aber imho konntest du beim Datumsformat auch irgendwas mit Zeitzonen angeben. Aber wie schon gesagt ... Wahrscheinlich verwechsel ich da grad was mit PHP.

[DeddyH]

Ich habe es nicht getestet (und evtl. auch wieder zu kompliziert gedacht), aber klappt das hier?

Delphi-Quellcode:

uses DateUtils;

function ArizonaTimeToMEZ(aDateTime: TDateTime): TDateTime;
const
  UTC_DIFF                = 7;
  SUMMERTIME_RELEVANTHOUR = 2;

  function UTCToMEZ(aDateTime: TDateTime): TDateTime;
  var
    SummerTimeStart, SummerTimeEnd: TDateTime;
    Year: word;

    function LastDayOfWeekOfMonth(Year, month: Integer; DayOfWeek: word): TDate;
    var
      temp: TDate;
    begin
      temp := IncMonth(EncodeDate(Year, month, 1));
      Result := IncDay(temp, (DayOfWeek - DayOfTheWeek(temp) + DaysPerWeek)
        mod DaysPerWeek - DaysPerWeek);
    end;

  begin
    Year := YearOf(aDateTime);
    SummerTimeStart := LastDayOfWeekOfMonth(Year, MonthMarch, DaySunday);
    SummerTimeStart := IncHour(DateOf(SummerTimeStart), SUMMERTIME_RELEVANTHOUR);
    SummerTimeEnd := LastDayOfWeekOfMonth(Year, MonthOctober, DaySunday);
    SummerTimeEnd := IncHour(DateOf(SummerTimeEnd), SUMMERTIME_RELEVANTHOUR);
    Result := aDateTime;
    if DateTimeInRange(aDateTime, SummerTimeStart, SummerTimeEnd) then
      Result := IncHour(Result);
  end;

begin
  Result := UTCToMEZ(IncHour(aDateTime, UTC_DIFF));
end;

[Bummi]

Ich habe kurz eine allgemeine Klasse gebastelt, vielleicht kannst Du mit der was anfangen, gegf. musst Du sie noch etwas aufbohren.

[Chriscode]

Hallo nochmals,
vielen vielen Dank für die zahlreichen, schnellen und sehr hilfreichen Antworten.

Sowohl die Codelösung von DeddyH als auch die Alternative von Bummi funktionieren, ich bin zusätzlich dank Jonas Shinaniganz noch auf folgende Lösung aufmerksam geworden: http://code.google.com/p/delphi-tzdb/

Damit kann man von einer Timezone in Universalzeit und von dort in eine andere Timezone umwandeln.

Jetzt bin ich unsicher welche Lösung die "beste", also sicherste und zuverlässigste ist. Insbesondere in Bezug auf Sommer/Winterzeit und Kalenderbesonderheiten.

LG,
Chris

[DeddyH]

Meine ist sicherlich nicht die beste, da sie nur von Arizona nach Mitteleuropa umrechnet. Die anderen sind universeller.

[Bummi]

Ich hatte noch einen bösen Bug drin ... DayLightDate wurde nicht berücksichtigt ist behoben.

[Uwe Raabe]

Zitat von Chriscode:

ich bin zusätzlich dank Jonas Shinaniganz noch auf folgende Lösung aufmerksam geworden: http://code.google.com/p/delphi-tzdb/

Damit kann man von einer Timezone in Universalzeit und von dort in eine andere Timezone umwandeln.

#8

[Chriscode]

Uwe,
entschuldige bitte vielmals. Der Hinweis kann selbstverständlich von dir, mein Fehler. Da ich versucht habe möglichst alle Antworten direkt zu verwerten bin ich etwas durcheinander gekommen. Von Jonas kam der Hinweis auf TTimezone welches auf dem von dir empfohlenen Projekt nochmals erwähnt wird.

Ich werde alle drei Lösungen nun noch einmal ausgiebig testen und dann schauen womit ich mich am sichersten fühle. Ggf. könnte ich auch alle Lösungen nehmen und dann das Ergebnis zur Sicherheit vergleichen.

Für die schnelle und kompetente Hilfe noch einmal vielen Dank an alle Beteiligten. Es ist wirklich schön, dass dieses Forum Delphi am Leben hält und zeigt was damit alles möglich ist.

LG,
Chris

[Olli73]

Halb OT:

Ich wäre froh, wenn das auch mal jemand Microsoft erklären könnte. Ich ärgere mich seit 2 Jahren damit rum, dass live (bzw. hotmail / outlook.com) beim Synchronisieren mit WP7 und Outlook die Geburtstage immer um 1 Tag verschiebt. Das passiert auch nicht in allen Zeitzonen (aber leider in unserer) und seit einem Update auch nur noch bei Geburtstagen, die in die Sommerzeit fallen.

Das Thema scheint also wirklich nicht trivial zu sein, auch wenn ich mich frage, wieso man überhaupt bei Geburtstagen mit Uhrzeiten/Zeitzonen rechnet...

[Uwe Raabe]

Zitat von Chriscode:

Uwe,
entschuldige bitte vielmals.

So hatte ich das nicht gemeint. Deine Formulierung las sich für mich so, als seist du erst auf Umwegen zu dem Link gekommen, den ich ja (zugegeben nur knapp kommentiert) bereits gepostet hatte.

Es passiert mir auch manchmal, daß genau in dem Moment, wo ich auf Antworten klicke, plötzlich ein oder mehrere zusätzliche Beiträge da sind, die ich dann leicht übersehe.