Create a new file date/de

function funDateiDatumAendern(strDateiname: string;
  strNeuerZeitstempel: string): boolean;
var
  datNeuesDateidatum: TDateTime;

begin

  Result := False;

  // Prüft, ob die Datei vorhanden ist
  if not FileExists(strDateiname) then
    exit;

  // legt den aktuellen Datums- und Zeitstempel der Datei fest
  // Die Schreibweise des Datums richtet sich nach dem Betriebssystem
  // Die Schreibweise der Uhrzeit richtet sich nach Sommer- und Winterzeit

  datNeuesDateidatum := StrToDateTime(strNeuerZeitstempel);

  // StrToTime('03:00')
  // TryStrToDateTime

  // Setzt das neue Dateidatum
  FileSetDate(strDateiname, DateTimeToFileDate(datNeuesDateidatum));

  Result := True;

end;

  if not funDateiDatumAendern('E:\Test.txt', '10.01.2000 14:34:56') then
    ShowMessage('Fehler');

  if not funDateiDatumAendern('/home/user/Dokumente/Test.txt', '10-1-00 14:34:56') then
    ShowMessage('Fehler');