如果用FileExists检测文件名如果不确定呢 比如文件名有可能是1 2 3或者4 5 6 等等
就是我也没办法确定文件名是什么 那应该怎么检测 或者也可以只需要检测文件夹底下是否有文件存在

解决方案 »

  1.   

    汗哦,楼主可以换一个角度简单地考虑问题,就是这个文件夹是不是为空的不就好了?使用FindFirst...FindNext...FindClose等函数。具体自己查资料。
      

  2.   

    不好意思,我刚刚在自学delphi 什么多不会的 呵呵 详细点可以吗 我自己在查资料 慢慢学
      

  3.   

    var
    SearchRec: TSearchRec;
    begin
    if FindFirst('c:\123\*', faAnyFile, SearchRec) = 0 then
    label1.caption:='存在'
    else label1.caption:='不存在'
    end;我自己有测试了一下 把* 换成 *.txt能测试成功 
    但是如果 文件是没有扩展名呢 用* 不管文件夹下有没有文件存在多返回存在
      

  4.   


    function  checkf(filena:string):boolean;
    var
    i:integer;
    listst:TStrings;
    begin
    result:=false;
    listst:=tstringlist.Create;
    listst[..]:=''//可能的文件名;
    for i:=0 to listst.count-1 do
    begin
     if FileExists(listst[i]) then
    result:=true;
    end;
    end;
      

  5.   

    FindFirst('c:\123\*.*', faAnyFile, SearchRec)