Question

Delphi怎么判断一个文件存在与否，文件还是文件夹

Answer 1

在 Delphi 里可以使用 FileExists / DirectoryExists 函数来判断指定文件、文件夹是否存在，也可以使用 GetFileAttributes 函数来获取指定目标属性来判断，以下是示例：

procedure TForm1.Button1Click(Sender: TObject);
begin
  if FileExists('e:\test.xls') then
    ShowMessage('文件存在。')
  else
    ShowMessage('文件不存在。');
  if DirectoryExists('E:\2017年\其他') then
    ShowMessage('是文件夹。')
  else
    ShowMessage('文件夹不存在或不是文件夹。');
end;