摘要: 删除目录(文件夹) 代码 调用 RmDir 删除目录 procedure TForm1.Button1Click(Sender: TObject); begin //创建测试目录 ForceDirectories('D:\测试目录1\目录1'); ForceDirectories('D:\测试目录1 阅读全文
posted @ 2023-02-04 09:36 txgh 阅读(851) 评论(0) 推荐(0) 编辑
摘要: 创建目录(文件夹) 代码 调用 MkDir 创建目录 procedure TForm1.Button1Click(Sender: TObject); begin //创建目录 MkDir('D:\测试目录1'); //如果目录存在时引发异常 try MkDir('D:\测试目录1'); except 阅读全文
posted @ 2023-02-04 09:34 txgh 阅读(568) 评论(0) 推荐(0) 编辑