您可以使用RTL的TPath.GetAttributes()、TFile.GetAttributes()或TDirectory.GetAttributes()方法，例如：

uses
  ..., System.IOUtils;

try
  if TFileAttribute.faDirectory in TPath{|TFile|TDirectory}.GetAttributes(path) then
  begin
    // path is a folder ...
  end else
  begin
    // path is a file ...
  end;
except
  // error ...
end;

或者，您可以直接使用Win32 API GetFileAttributes()或GetFileAttributesEx()函数，例如：
x一个一个一个一个x一个一个二个x

// Note: the folder must exist.
function IsFolder(CONST FullPath: string): boolean;
begin
 Result:= {NOT FileExists(FullPath) AND} DirectoryExists(FullPath);
end;