在?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;