Delphi 文件处理（2）

1. 文件管理类函数

判断文件是否存在 FileExists                              判断文件夹是否存在 DirectoryExists

删除文件 DeleteFile; Windows.DeleteFile          删除文件夹 RemoveDir; RemoveDirectory

获取当前文件夹 GetCurrentDir                          设置当前文件夹 SetCurrentDir; ChDir; SetCurrentDirectory

获取指定驱动器的当前路径名 GetDir                文件改名 RenameFile

建立文件夹 CreateDir; CreateDirectory; ForceDirectories                    删除空文件夹 RemoveDir; RemoveDirectory

获取当前文件的版本号 GetFileVersion               获取磁盘空间 DiskSize; DiskFree

查找一个文件 FileSearch                                   搜索文件 FindFirst; FindNext; FindClose

读取与设置文件属性 FileGetAttr; FileSetAttr                                            获取文件的创建时间 FileAge; FileDateToDateTime

 

1.1 API 文件处理函数

1. GetWindowsDirectory - 获取 Windows 所在目录

//声明:GetWindowsDirectory( 

                  lpBuffer: PChar;{缓冲区} 

                  uSize: UINT     {缓冲区大小}): UINT;         {返回实际长度}

num := GetWindowsDirectory(arr, MAX_PATH);

2. GetSystemDirectory - 返回 System 文件夹路径

//声明:
GetSystemDirectory(
  lpBuffer: PChar; {缓冲区}
  uSize: UINT      {缓冲区大小}
): UINT;           {返回实际长度}

num := GetSystemDirectory(arr, MAX_PATH);  

3.GetTempPath - 获取临时文件夹路径

//声明:
GetTempPath(
  nBufferLength: DWORD; {缓冲区大小}
  lpBuffer: PChar       {缓冲区}
): DWORD;               {返回实际长度}
num := GetTempPath(MAX_PATH, arr)