delphi的判断文件和文件夹


本文整理自网络,侵删。

 //判断
if not Fileexists('c:\2.exe') then
begin
//如果文件不存在
end;
if not Directoryexists('C:\Program Files\test') then
begin
//如果文件夹不存在
end;
//
delphi创建和删除文件夹
1.本目录创建和删除test文件夹
uses段中添加对ShellApi
CreateDirectory(PChar(ExtractFilePath(ParamStr(0))+'Test'),nil);//创建
RemoveDirectory (Pchar(ExtractFilePath(ParamStr(0))+'Test'))//删除

2.在指定的目录创建和删除test文件夹
CreateDirectory(PChar('C:\Program Files\Test'),nil); //创建

RemoveDirectory (PChar('C:\Program Files\Test'),nil); //删除

DeleteFile('c:\new.exe') ; //删除文件

相关阅读 >>

Delphi得到字符串中第一个汉字的位置

Delphi 下保存真彩彩图标的方法实例

Delphi 获取鼠标与键盘空闲时间

Delphi idhttp添加头信息

Delphi窗口界面必学的知识

Delphi鼠标移过放大镜效果

Delphi android 启动卡死处理方法

Delphi 在unicodestring中使用utf-8字符串

Delphi xe 使用savestate保存firemonkey状态的示例

Delphi 把pf8bit位图变换成pf24bit位图

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...