Dateien kopieren und umbenennen

[Andreas L.]

Oder in Delphi:

Delphi-Quellcode:

sourcefile := 'C:\quelle\datei.exe';
outputdir := ExtractFilePath(ParamStr(0)) + 'output\';
// namen ist eine TStringList mit den Namen aus der Datei
for i := 0 to namen.count -1 do
  CopyFile(sourcefile, outputdir + namen[i] + '.exe');