delphi Renamefile函数改名问题

Posted 2023-03-28

delphi用renamefile函数修改文件名.
如何保存扩展名..
如:
1.rar
2aaaa.exe
3ddd.zip
分别修改为:
11
12
13
扩展名不变

参考技术A var
SourceFileName: string;
begin
SourceFileName:= '2aaaa.exe';
RenameFile('C:\' + SourceFileName, 'C:\1' + LeftStr(SourceFileName,1)+ ExtractFileExt(SourceFileName));
end;
其它的文件只需要替换SourcefileName的值就可以了。
使用的时候请保证文件名和路径的准确，本方法在WIN XP SP2 + D7下测试通过。

怎么在delphi中给一个文件夹改名字,谢谢回答!

如图,, 我知道用 ExtractFileName(); 函数可以提取文件名,,但文件夹的名字要怎么提取? 怎么给一个文件夹改名,? 在文件夹中新建一个文本文档 我问了三个问题,每个问题 80 分,,我不知道这个做起来难不难,分数不够可以加 我要每个按钮单击事件中的代码,,谢谢!

参考技术A 修改文件夹名称 Delphi syntax: function Rename(const Filename: WideString; const NewName: WideString): Integer; overload;本回答被提问者采纳