FTP-Verzeichnis vorhanden?

[marlem]

hi Klaus!

habe es so gemacht:

Delphi-Quellcode:

  SLFTPListe := TStringList.Create;
     try
     List(SLFTPListe,'*',true);
     gefunden := false;
     Suchwert := 'ms'+trim(RegUti_ReadKey (REGKEY_INTERFACE_BOERSE,'MotoScout24KundenNr'));
     //Nachschauen ob Verzeichnis schon da ist

      for i := 0 to SLFTPListe.Count-1 do
          begin
          //Prüft auf Verzeichnis und Suchwert
          if (pos('drw',SLFTPListe[i]) > 0) and (pos(Suchwert,SLFTPListe[i]) > 0) then
             begin
             Listenwert := trim(copy(SLFTPListe[i],pos(Suchwert,SLFTPListe[i]),length(Suchwert)));
             if Listenwert = Suchwert then
                begin
                ShowMessage('Suchwert: ' + Suchwert + '   ' + 'Listenwert: ' + Listenwert);
                gefunden := true;
                end;
             end;
         end;

aber ist das wirklich die einzige möglichkeit?
wurde der befehl "dirExist" bei indy echt vergessen?