Änderungsdatum neu setzen, das neue Änderungsdatum liegt als TDateTime vor... Wie?

[juergen]

Hallo zusammen,
ich nutze GetFileDateTime und SetFileDateTime um die 3 Datumseigenschaften von Dateien auszulesen und später wieder rückzuschreiben.
Damit ändern sich letztlich die 3 Datumswerte der Dateien nicht, wenn ich die Dateien in einer anderen Procedure bearbeitet habe.

Delphi-Quellcode:

procedure TTest.GetFileDateTime(const TheFile: string; var fCreationTime, fLastAccessTime, fLastWriteTime: FileTime);
var
  fh: THandle;
begin
  fh := FileOpen(TheFile, fmOpenRead);
  GetFileTime(fh, @fCreationTime, @fLastAccessTime, @fLastWriteTime);
  CloseHandle(fh);
end;

procedure TTest_Form.SetFileDateTime(const TheFile: string; fCreationTime, fLastAccessTime, fLastWriteTime: FileTime);
var
  fh: THandle;
begin
  fh := FileOpen(TheFile, fmOpenReadWrite);
  SetFileTime(fh, @fCreationTime, @fLastAccessTime, @fLastWriteTime);
  CloseHandle(fh);
end;

Nun möchte ich aber das Änderungsdatum neu setzen. Der Wert liegt mir als TDateTime vor.
Ich habe nun schon einiges probiert, bekomme es aber leiderr nicht hin.
Kann man @fLastAccessTime überhaupt "manipulieren"?

Für Hilfe wäre ich sehr dankbar!