怎么根据文件名判断是文件还是文件夹

如何根据文件名判断是文件还是文件夹？
知道的说一下

[解决办法]

Delphi(Pascal) code

var  C: Cardinal;begin  C := GetFileAttributes('d:\a');  if C = $FFFFFFFF then ShowMessage('文件或文件夹不存在!')  else if C and FILE_ATTRIBUTE_DIRECTORY <> 0 then ShowMessage('是文件夹！')  else ShowMessage('是文件！')end;