Delphi-Quellcode:
var
AlterDateiName,
NeuerDateiName : string;
begin
AlterDateiName := 'C:\Datei.txt';
// Wir bauen uns den neuen Datei-Namen
NeuerDateiName := ChangeFileExt( AlterDateiName, '.dat' );
// Wir ändern den Namen der Datei auf der Fest-Platte
RenameFile( AlterDateiName, NeuerDateiName );
end;
So in etwa muss der Code lauten - nur noch an die eigene Umgebung anpassen
ach, ja, weil es jetzt so schön ist:
RenameFile
ChangeFileExt
Kaum macht man's richtig - schon funktioniert's

Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)