Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.164 Beiträge
 
Delphi 11 Alexandria
 
#1

Datei-Änderungsdatum auslesen- NUR das Jahr neu setzen und in Datei zurückschreiben

  Alt 29. Apr 2011, 19:03
Delphi-Version: 2007
Hallo zusammen,

mit den Datumsfunktionen stehe ich wirklich auf dem Kriegsfuss.
Ich habe einiges gesucht und ausprobiert, bekomme aber leider nicht das gewünschet Ergebnis.

Ich lese das Änderungsdatum einer Datei aus. Z. B. mit GeFileTime(). Somit habe das Dateidatum in einem TDateTime-Format.
Egal welches Jahr dort drin steht, ich möchte ein neues Jahr setzen (nur das Jahr).
Zu beachten wäre evtl., dass das Jahr auch durchaus vor 1980 sein kann.

1. Wie bekomme ich das mit dem Jahr hin?
2. Wie schreibe ich es dann in die Datei zurück? (wird wohl im Wesentlíchen von der Umsetzung aus Punkt 1 abhängen, evtl. mit SetFileTime()?)

Freue mich über jede Hilfestellung.
Danke schon mal vorab!
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
  Mit Zitat antworten Zitat