我想问一下:::怎么判断某文件夹有某文件啊?

解决方案 »

  1.   

    if FileExists(全路径文件名) then
    showmessage('文件存在')
    else showmessage('文件不存在');
      

  2.   

    判断路径是否存在:
       BOOL   PathFileExists(   
              LPCTSTR   pszPath   
              ); 
    用API判断文件是否存在:
    function bool FileExistsAPI(const FileName:string)
    {
    hFile hf;
    bool Result;  hf=CreateFile(PChar(FileName),GENERIC_READ,FILE_SHARE_READor       FILE_SHARE_WRITE,nil,OPEN_EXISTING,0,0);Result=true;
    if hf=INVALID_HANDLE_VALUE  Result=false;
    CloseHandle(hf);return Result;
    }