CreateDir 函数

新建一个目录。如果创建成功，则返回True；否则返回False。函数原型如下：

function CreateDir(const Dir: string): Boolean;

例如要在C 盘根目录下建立一个Tem 目录可以编写如下代码：

CreateDir(’C:Tem’);

如果想在“C:Acc”目录下建立一个“A”目录，而“C:Acc”目录不存在，以下的代码将不能创建“A”目录。

CreateDir(’C:AccA’);

ChDir 过程

改变当前的目录。如果在指定路径中包含有驱动器号（盘符），则相应地改变当前的驱动器。过程原型如下：

procedure ChDir(S: string);

例如将当前目录更改为“C:Windows”目录，可以这样写：

ChDir(’C:Windows’);

3．DirectoryExists 函数

检测指定的目录是否存在。如果存在，函数则返回True；否则，返回False。函数原型如下：

function DirectoryExists(Name: string): Boolean;

如果在参数Name 中指定的不是绝对路径，则使用相对路径，默认在当前目录中进行查询。