主题：请问如何用pascal语言建立一个文件夹?
bigchen
[专家分：1940] 发布于 2007-02-21 10:12:00
如题
谢谢!
回复列表 （共8个回复）
沙发
lgr7000 [专家分：230] 发布于 2007-02-21 15:01:00
用mkdir函数
begin
mkdir('C:\新建文件夹');
end.
板凳
bigchen [专家分：1940] 发布于 2007-02-24 09:59:00
谢谢啊!
3 楼
tbk [专家分：30] 发布于 2007-02-25 11:11:00
不错哦，学了点东西。
4 楼
bigchen [专家分：1940] 发布于 2007-02-25 14:15:00
那么在pascal语言中是否可以判断一个文件夹是否存在呢?
比如说写一个程序
给你一个文件夹名和一个指定路径
如果这个文件夹存在就不进行任何操作
如果这个文件夹不存在就建立这个文件夹
请问哪位大牛会写这个程序?
5 楼
游侠UFO [专家分：1200] 发布于 2007-02-26 00:38:00
判断文件是否存在我已经会了,不过文件夹还不会
文件是否存在可以用编译开关加 IOresult 实现
{$I-}
reset(f);
{$I+}
if IOresult=0 then 文件存在
else 文件不存在;
6 楼
lgr7000 [专家分：230] 发布于 2007-03-03 15:24:00
[quote]那么在pascal语言中是否可以判断一个文件夹是否存在呢?
比如说写一个程序
给你一个文件夹名和一个指定路径
如果这个文件夹存在就不进行任何操作
如果这个文件夹不存在就建立这个文件夹
请问哪位大牛会写这个程序?[/quote]
其实用mkdir就可以满足你的要求,因为经过我的测试，mkdir在新建文件夹时会先进行判断，如果这个文件夹存在就不进行任何操作,如果这个文件夹不存在就建立这个文件夹
7 楼
bigchen [专家分：1940] 发布于 2007-03-03 16:24:00
至于mkdir
我也试过
如果这个文件夹存在
执行到这句话的时候
会跳出程序
显示出错信息
8 楼
游侠UFO [专家分：1200] 发布于 2007-03-03 17:26:00
可以试试用编译开关
{$I-}
mkdir('C:\新建文件夹');
{$I+}
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — 请问如何用pascal语言建立一个文件夹?