Irritationen bei SetLastWriteTime/ GetLastWriteTime

[Delphi.Narium]

Hab' die Links nochmal bei mir ausprobiert, sie funktionieren beide.

Sollte es irgendwo, bei irgendwem Probleme geben:

Wikipediaseite aufrufen und als Suchbegriff "Greenwich Mean Time" eingeben. Es gibt dort (zur Zeit) eine Fundstelle.

Der zweite Suchbegriff wäre "Koordinierte Weltzeit", auch hier gibt es nur eine Ergebnisseite.

Naja: Tante Google und all' ihre Schwestern liefern zu den Suchbegriffen auch noch eine Reihe Ergebnisse, die ggfls. (aus fachlicher Sicht) besser sind, als Wikipedia.

[bcvs]

Zitat von Frühlingsrolle:

Damit sollte die 'lokale' Zeitangabe der Datei erhoben werden können:

Danke, aber damit sind wir bei dem ersten Problem aus meinem Ursprungspost.

Bei einer Datei, die ein Änderungsdatum innerhab der Sommerzeit hat, liefert dieses GetFileDateTime, genause wie auch TFile.GetLastWriteTime eine Uhrzeit, die eine Stunde früher liegt, als das vom Windows-Explorer angezeigte Änderungsdatum.

[Delphi.Narium]

Vermutlich (steile Behauptung), weil der Windows-Explorer zur Anzeige das eigentliche Datum, also das mit GetLastWriteTime gelesene, "zeitzonen- bzw. sommerzeitkomform" umrechnet und dann das so erhaltenen Ergebnis anzeigt?

Zu prüfen wäre hier also mal, ob die von Dir genutzte Vorgehensweise die korrekt arbeitende ist und der (vermeintliche) Fehler erst durch die Anzeige durch des "Vergleichsmittel" (hier der Windows-Explorer) verursacht wird.

Schau doch bitte mal auf der Kommandozeile nach, ob es dort andere Ergebnisse gibt, als mit Deiner Routine bzw. dem Windows-Explorer.

Code:

dir
dir /TC = Erstellung
dir /TA = letzter Zugriff
dir /TW = letzter Schreibzugriff

Was passiert denn, wenn Du mal (testweise) die Zeitzonen Deines Windows änderst? Bleibt das Ergebnis Deiner Routine dann unverändert, während der Windows-Explorer eine andere Zeit anzeigt?
Habe allerdings keine Ahnung, welche anderweitigen (nicht zwingend wünschenswerten) Nebenwirkungen daraus resultieren.

[bcvs]

Diese Vermutung hatte ich auch schon und so scheint es auch wirklich zu sein.

Der Dir-Befehl in der Eingabeaufforderung liefert die gleiche Zeit wie GetLastWriteTime, also eine Stunde früher als der Explorer. Anders allerdings die PowerShell: Hier zeigt Dir die selben Werte an wie der Explorer.

Dann werde ich also weiterhin mit Set/GetLastWriteTime arbeiten und mich nicht drum kümmern, was der Explorer sagt.

Bleibt allerdings noch das zweite Problem mit der UTC-Variante

Delphi-Quellcode:

TFile.SetLastWriteTimeUTC('test.txt', StrToDateTime('01.05.2020 10:00'));
TFile.GetLastWriteTimeUTC('test.txt'))); // liefert 01.05.2020 09:00

Wo bleibt hier die eine Stunde? Wird da auch irgendwo etwas mit der Sommerzeit gerechnet?

[Delphi.Narium]

Wiedermal nur geraten:

StrToDateTime('01.05.2020 10:00') ist die Ortszeit, entsprechend der Windowseinstellungen auf dem Rechner.

Steht dort in der Zeitzone Berlin, dann ist UTC für Greenwich eine Stunde früher. Es wird für UTC also lokale Zeit minus Differenz zwischen Greenwich und Berlin genommen.

Steile Behauptung:

Änderst Du die Zeitzone Deines Rechners auf Tokio, so wird die Differenz 10 Stunden betragen. In Tokio ist es neun Stunden später als bei uns, bis Greenwich macht das dann -10 Stunden aus.
Also sowas:

Delphi-Quellcode:

TFile.SetLastWriteTimeUTC('test.txt', StrToDateTime('01.05.2020 10:00'));
TFile.GetLastWriteTimeUTC('test.txt'))); // liefert 01.05.2020 00:00

Änderst Du die Zeitzone Deines Rechners auf Seattle, wird die Differenz +8 Stunden betragen.
Also sowas:

Delphi-Quellcode:

TFile.SetLastWriteTimeUTC('test.txt', StrToDateTime('01.05.2020 10:00'));
TFile.GetLastWriteTimeUTC('test.txt'))); // liefert 01.05.2020 18:00

In Tokio ist UTC 10 Stunden weniger als die Ortszeit von Tokio, in Seattle ist UTC 8 Stunden mehr als die Ortszeit von Seattle.

[himitsu]

Nein, die Datumstypen in Delphi haben keine Zeitzoneninformationen.
Das was drin steht, das steht drin, es kommt dann nur darauf an, wie man den Wert interpretiert.

Ich hat mit mal den Code TFile.SetLastWriteTimeUTC und TFile.GetLastWriteTimeUTC angesehn und so weit scheint es zu stimmen,
ABER dort werden zum Setzen und Lesen unterschiedliche Windows-APIs verwendet und womöglich hat Eine davon "inzwischen" eine Zeitzonenkonvertierung drin?
SetFileTime
GetFileAttributesEx statt GetFileTime

[bcvs]

Hm, ohne StrToDateTime sieht es aber genauso aus:

TFile.SetLastWriteTimeUTC('test.txt', 43922.5); // entspricht 01.04.2020 12:00
TFile.GetLastWriteTimeUTC('test.txt'); // liefert 01.04.2020 11:00

Beim Umstellen der Zeitzonen bin ich auf folgendes gestoßen:

Da gibt es in den Win10-Einstellungen den Schalter "Automatisch an Sommerzeit anpassen". Wenn man den ausschaltet, gibt es keine Differenz zwischen Set und Get.

Das GetLastWriteTimeUTC passt die Zeit tatsächlich an die Sommerzeit an. Das hätte ich jetzt nicht vermutet. Ich dachte UTC ist die koordinierte Weltzeit, unabhängig von irgendwelchen Sommerzeitregelungen.

Deshalb stellt sich jetzt die Frage: Wie komme ich an die nicht sommerzeitangepasste UTC-Dateizeit?