判断文件路径是否为正确路径的问题(100分)

楼主的意思就是找出第一个存在的文件吧？
用循环嘛,每次增加一个char,到FileExists(s)为真时就退出循环.

做一个函数吧:
1.根据ExtractFilePath获得路径A,根据ExtractFileName得到带参数的文件名B,根据ExtractFileExt得到后缀C
2.B:=Copy(B,1,Length(B)-Length(C))
3.你没有见过存在空格的后缀吧,所以:
if C<>'' then begin
iPos:=Pos(' ',C);
if iPos>0 then
C:=Copy(C,1,iPos-1);
end;
4.FileName:=A+B+C;