ftp - urgente!

[taurux]

Hola:

Estoy intentando hacer un sencillo cliente ftp. A la hora de conectarme me da el siguiente error:
Project Project1.exe raise exception class EldSocketError with message 'Socket Error # 10054 connection reset by peer'. Process stopped. Use step to run to continue.

Y el codigo que tengo puesto es el siguiente:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
idftp1.Host:=edit1.Text; //207.46.133.140 - la de microsoft
idftp1.Port:=strtoint(edit4.Text); //21
idftp1.Username:=edit2.Text; //anonymous
idftp1.Password:=edit3.Text; //anonymous
try
begin
idftp1.Connect();
statusbar1.SimpleText:='Conectado...';
end
except
memo1.Lines.Add('Error durante la conexion');
end;
end;

y el error creo que lo da el metodo Connect().
El ejemplo del Indy tambien me da el mismo fallo.
He cerrado el proxy que tengo instalado para evitar problemas pero ni aun asi. He hecho pruebas con clientes ftp como Cute y FTP Explore y funcionan (aunque a veces tambien me dan problemas).

Saludos y gracias.

[[__hector]]

La conexion ha sido cerrada por el servidor a quien le hiciste la peticion. No es error del socket, sino que es probable que el servidor no este aceptando conexiones, o que quizas siquiera tenga el servicio de FTP funcionando.

Prueba con otros....

[acertij022]

gracias seguire invesigando como mejorar mi cliente FTP