FTP-connect und ftp-lister klappt nicht

[Master-Joko]

Hurra - ich hab's doch geschafft....

und zwar so:

Delphi-Quellcode:

procedure Thaupt.connect_buttonClick(Sender: TObject);

var idftp:Tidftp;
begin
  idftp:=TIdftp.Create(Self);
  idftp.Username:= user_edit.Text;
  idftp.Password:= password_edit.Text;
  idftp.Port:=StrToInt(port_edit.Text);
  idftp.Host:= ip_edit.Text;
    try
      Idftp.Connect();
      Idftp.ChangeDir (ip_pfad_edit.Text);


begin

  FTP_Inhalt:=TStringList.Create;
  with Form1 do
  begin
    ListBox1.items.Clear;
    IdFTP.List(FTP_Inhalt);
    ListBox1.Items.Assign(FTP_Inhalt);
  end;
end;

    except
       showmessage('überprüfe Angaben!!!');
    end;
end;

thx @ all trotzdem nochmal