1. Bitte gewöhne Dir eine durchschaubare Einrückung an, das macht den Code leichter lesbar.
2. Die Execute-Methode eines Dialogs ist eine Funktion, also sollte man den Rückgabewert auswerten.
3. Versuch mal, diese Funktion einzubinden (ohne Gewähr, da aus dem Kopf getippt):
Delphi-Quellcode:
function Umbenennen(const OldName, NewName: string): Boolean;
begin
Result := MoveFileEx(PAnsiChar(OldName),PAnsiChar(NewName),MOVEFILE_REPLACE_EXISTING);
end;