TJSON.JSONToObject DateTime als LocalTime

[skybibo]

Hi,

normalerweise wird in dem Fall mit UTC gearbeitet. UTC ist unabhängig von der Zeitzone und es gibt keine Sommer/Winterzeit. Die Speicherung und Übertragung erfolgt dann nur im UTC Format und wird dann am Ziel wieder in die Lokale Zeit umgewandelt (oder eine andere Zeitzone).

[Hobbycoder]

Über die TJSONOption [joDateIsUTC] kann ich das ja einstellen.

Dann muss ich auf Serverseite mit der Funktion:

Delphi-Quellcode:

function UTCToLocalTime(AValue: TDateTime): TDateTime;
var
  SysTime1, SysTime2: TSystemTime;
  TZinfo: TTimeZoneInformation;
begin
  GetTimeZoneInformation(TZinfo);
  DateTimeToSystemTime(AValue, SysTime1);
  SystemTimeToTzSpecificLocalTime(@TZinfo, SysTime1, SysTime2);
  Result := SystemTimeToDateTime(SysTime2);
end;

das in die lokale Zeit umrechnen. Trotzdem habe ich immer noch eine Stunde zuviel. Berücksichtigt die Funktion SystemTimeToTzSpecificLocalTime keine Sommer-/Winterzeit?

[Olli73]

Wie sieht denn der String aus, den du sendest?

2009-06-30T18:30:00+02:00 (lokale Zeit)

oder

2007-12-24T18:21:00Z (UTC)

[Hobbycoder]

Gesendet und empfangen wird "2023-11-01T10:52:32.271Z"

Nach der Umrechnung habe ich 01.11.23 11:52:32

[Olli73]

sieht aber richtig aus !?

[Hobbycoder]

Ja, nur dass wir zu dem Zeitpunkt 10:52 hatten.
Deswegen meine Frage, fehlt das noch die Berücksichtigung Sommer/Winterzeit? Oder muss die Funktion das so können?

[Uwe Raabe]

Um 10:52 LocalTime sollte bei UTC aber ein anderer Wert herauskommen als "2023-11-01T10:52:32.271Z". Das Problem liegt also vermutlich beim Sender und nicht beim Empfänger.

Wie sieht denn der Code auf Client-Seite aus?

[Olli73]

Was passiert wenn du "joDateIsUTC" abschaltest?