⑵DeleteFile()
原型：extern PACKAGE bool __fastcall DeleteFile(const System::AnsiString FileName);
功能：删除文件，如果成功返回true，否则返回false
参数：FileName:要删除的文件名
例：if(OpenDialog1->Execute())DeleteFile(OpenDialog1->FileName);
⑶DirectoryExists()
原型：extern PACKAGE bool __fastcall DirectoryExists(const System:: AnsiString Name);
功能：检测目录是否存在，如果存在返回true，否则返回false
参数：Name:要检测的目录名
例：if(!DirectoryExists("ASM"))CreateDir("ASM");//如果ASM这个目录不存在则创建之
⑷DiskFree()
原型：extern PACKAGE __int64 __fastcall DiskFree(Byte Drive);
功能：检测磁盘剩余空间，返回值以字节为单位，如果指定的磁盘无效，返回-1
参数：Drive：磁盘的代号，0表示当前盘, 1=A,2=B,3=C 以此类推
例：ShowMessage(DiskFree(0));//显示当前盘的剩余空间
⑸DiskSize()
原型：extern PACKAGE __int64 __fastcall DiskSize(Byte Drive);
功能：检测磁盘容量，返回值以字节为单位，如果指定的磁盘无效，返回-1
参数：Drive：磁盘的代号，0表示当前盘, 1=A,2=B,3=C 以此类推
例：ShowMessage(DiskFree(0));//显示当前盘的容量
⑹FileExists()
原型：extern PACKAGE bool __fastcall FileExists(const AnsiString FileName);
功能：检测文件是否存在，如果存在返回true，否则返回false
参数：FileName:要检测的文件名
例：if(FileExists("AAA.ASM"))DeleteFile("AAA.ASM");
⑺FileGetAttr()
原型：extern PACKAGE int __fastcall FileGetAttr(const AnsiString FileName);
功能：取得文件属性，如果出错返回-1
返回值如下表，如果返回$00000006表示是一个具有隐含和系统属性的文件(4+2)
常量 值 含义
faHidden $00000002 隐含文件
faSysFile $00000004 系统文件
faVolumeID $00000008 卷标
faDirectory $00000010 目录
faArchive $00000020 归档文件
例：if(FileGetAttr("LLL.TXT")&0x2)ShowMessage("这是一个有隐含属性的文件");
与此对应的有FileSetAttr() ，请自已查阅帮助系统
⑻FileGetDate()
原型：extern PACKAGE int __fastcall FileGetDate(int Handle);
功能：返回文件的建立时间到1970-1-1日0时的秒数
参数：Handle:用FileOpen()打开的文件句柄。
例：
int i=FileOpen("C://autoexec.bat",fmOpenRead);
ShowMessage(FileGetDate(i));
FileClose(i);
与此对应的有FileSetDate()，请自已查阅帮助系统
⑼GetCurrentDir()
原型：extern PACKAGE AnsiString __fastcall GetCurrentDir();
功能：取得当前的目录名
例：ShowMessage(GetCurrentDir());
⑽RemoveDir()
原型：extern PACKAGE bool __fastcall RemoveDir(const AnsiString Dir);
功能：删除目录，如果成功返回true，否则返回false
参数：Dir:要删除的目录名
例：if(DiectoryExists("ASM"))RemoveDir("ASM");
⑾SetCurrentDir()
原型：extern PACKAGE bool __fastcall SetCurrentDir(const AnsiString Dir);
功能：设置当前目录，如果成功返回true，否则返回false
参数：Dir:要切换到的目录名
例：SetCurrentDir("C://WINDOWS");
转载请注明出处。作者：四极管。广西师范大学 电子工程学院大学生科技创新基地 邮箱：yangxingbo-0311@163.com。