Problem hat sich geklärt indem ich mir eine eigen Function geschrieben hab die sogar funktioniert
Delphi-Quellcode:
function DirExists(DirName : String) : Boolean;
begin
try
Form1.IDFTP1.ChangeDir(DirName);
Form1.IdFTP1.ChangeDirUp;
Result := true;
except
Result := false;
end;
end;