var
FmyFTP1: TIdFTP;
MystrList:TStringList;
begin
FmyFTP1.IOHandler.DefStringEncoding:=TEncoding.ANSI;
FmyFTP1.List(MystrList,'',False); //获取FTP服务器上面的文件列表。
if MystrList.Count<>0 then
begin
//循环查找你要的文件。看是否存在。
end;
end;