Einzelnen Beitrag anzeigen

norwegen60

Registriert seit: 23. Dez 2007
Ort: Schwarzwald
505 Beiträge
 
Delphi 12 Athens
 
#1

Filedatum einer jpg-Datei in Win7 ändern

  Alt 22. Okt 2014, 23:34
Hallo,

ich habe ein Programm geschrieben, mit dem ich die diversen Datums eines Bildes korrigieren kann. Das funktioniert einwandfrei mit den EXIF-Datums. Seit Win7-64bit habe ich aber Probleme mit dem Datei-Datum. Ich habe es mit
Delphi-Quellcode:
            sFileDatum := '11.11.2011 11:11:11';
            FileSetDate(sFile, DateTimeToFileDate(StrToDateTime(sFileDatum)));
und zusätzlich mit
Delphi-Quellcode:
            hFile := FileOpen(sFile, fmOpenWrite or fmShareDenyNone);
            try
              DateTimeToSystemTime(StrToDateTime(sFileDatum), stWrite);
              SystemTimeToFileTime(stWrite, ftWrite);
              if not SetFileTime(hFile, @ftWrite, @ftWrite, @ftWrite) then
                ShowMessage((format('%s: Can´t set dates ## %s', [ExtractFileName(sFile), sFile]));
            finally
              FileClose(hFile);
            end;
probiert.
Problem:
Im Explorer wird weiterhin das alte Datum angezeigt. Verschiebe ich die Datei in ein anderes Verzeichnis, wird der 11.11. angezeigt. Schiebe ich sie wieder in das Verzeichnis zurück, in dem ich das Datum mit Delphi geändert habe, wird wieder das ursprüngliche Datum angezeigt. So als befände es sich in einem Puffer. Das Datum bleibt aber auch das alte, wenn ich das Bild im Verzeichnis dupliziere.
Rechtsklick-Dateieigenschaften zeigt '11.11.2011 12:11:11'
IrfanView Datum/Uhrzeit zeigt auch '11.11.2011 12:11:11'e

Hauptproblem ist, dass sich das Datum im Explorer gar nicht ändert.
Nebenproblem ist die Stunde Zeitverschiebung.

Wer kann helfen?

Vielen Dank
Gerd
  Mit Zitat antworten Zitat