idFTP.Connect Fehler abfangen

[TKC]

versuchs mal so...

Delphi-Quellcode:

  try
    FTP.Connect;

    if FTP.Connected then
      begin
         //Anweisungen
      end;

    FTP.Quit;
  except
    on E: Exception do
      begin
        ShowMessage('Verbindungsfehler :' + E.Message);
        FTP.Quit;
      end;
  end;