txgh

摘要： 删除目录（文件夹） 代码 调用 RmDir 删除目录 procedure TForm1.Button1Click(Sender: TObject); begin //创建测试目录 ForceDirectories('D:\测试目录1\目录1'); ForceDirectories('D:\测试目录1 阅读全文

摘要： 创建目录（文件夹） 代码 调用 MkDir 创建目录 procedure TForm1.Button1Click(Sender: TObject); begin //创建目录 MkDir('D:\测试目录1'); //如果目录存在时引发异常 try MkDir('D:\测试目录1'); except 阅读全文