kopieren und gleichzeitig umbenennen einer Datei

[Susanne]

Ich möchte eine Datei kopieren und ihr im Zielverzeichnis einen neuen Namen geben

Delphi-Quellcode:

von:= ExtractFilePath(Sourcepath)+KeyValue+'.tif';
nach:= Exportpath+'\'+ExportName+'.tif';
CopyFile(PChar(von), PChar(nach), False);

Aber wenn ich das so versuche, kopiert er die Datei gar nicht erst

Delphi-Quellcode:

von:= ExtractFilePath(Sourcepath)+KeyValue+'.tif';
nach:= Exportpath+'\'+KeyValue+'.tif';
nach2:= Exportpath+'\'+ExportName+'.tif';
if CopyFile(PChar(von), PChar(nach), False) then
   begin
      RenameFile(nach,nach2 );
   end;

Wenn ich sie erst mit dem gleichen Namen ins Zielverzeichnis stelle, kopiert er die Datei, aber im nächsten Schritt benennt er sie nicht um?