Dateien kopieren und umbenennen

[Sir Rufo]

Oder auch mit der Unit aus dem Thread http://www.delphipraxis.net/158152-d...-datentyp.html

Delphi-Quellcode:

var
  Source, Target : _FileName;
  lName : string;
begin
  Source := 'C:\quelle\Datei.exe';
  Target := Source;
  Target.cd( 'output' ); // wechselt den Pfad => "C:\quelle\output\Datei.exe"
  if Target.ForcePath then // legt den Pfad "C:\quelle\output\" an
    for lName in namen do
      begin
        Target.FileNameWoExt := lName; // ersetzt nur den Namen nicht die Extension
        CopyFile( Source, Target );
      end;
end;