![]() |
AW: Zeitumrechnung möglich?
Gibt es das dort auch? AFAIK ist das eine rein europäische Erfindung.
|
AW: Zeitumrechnung möglich?
Ich sehe auch grade noch speziell diesen Eintrag:
![]() Vielleicht rechnest du einfach hin und dann zurück ->, du schaffst das schon ;) |
AW: Zeitumrechnung möglich?
Zitat:
|
AW: Zeitumrechnung möglich?
Gerade gefunden:
![]() Zitat:
|
AW: Zeitumrechnung möglich?
"No daylight saving time" Hat er doch im ersten Post geschrieben...
|
AW: Zeitumrechnung möglich?
Dann hab ich das ja nur bestätigt ;). Macht die Berechnung etwas einfacher wie schon beschrieben.
|
AW: Zeitumrechnung möglich?
Zitat:
|
AW: Zeitumrechnung möglich?
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; |
AW: Zeitumrechnung möglich?
Liste der Anhänge anzeigen (Anzahl: 3)
Ich habe kurz eine allgemeine Klasse gebastelt, vielleicht kannst Du mit der was anfangen, gegf. musst Du sie noch etwas aufbohren.
|
AW: Zeitumrechnung möglich?
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: ![]() 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 |
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:16 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz