大哥哥，帮帮小美妹吧。

Question

::SetCurrentDirectory(目录);失败则目录不存在，成功存在

Answer 1

错了，目录是：
uses FileCtrl;procedure TForm1.Button1Click(Sender: TObject);
begin
  ifnot DirectoryExists('c:\temp') then
    ifnot CreateDir('C:\temp') then
    raise Exception.Create('Cannot create c:\temp');
end;

Answer 2

调用WinAPI
HANDLE FindFirstFile(
  LPCTSTR lpFileName,               // file name
  LPWIN32_FIND_DATA lpFindFileData  // data buffer
);
并且判断
lpFindFileData->dwFileAttributes是否为FILE_ATTRIBUTE_DIRECTORY就可以了。