Ver Mensaje Individual
  #13  
Antiguo 28-04-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola de nuevo.

No se que decirte por que no he recibido nunca ese error que aparenta ser de protocolo.

Como dato adicional, con tus valores y quitando el try/except obtengo el error: Socket error #10060 Connection timed out, que normalmente es debido a que el cliente no recibe respuesta del servidor.

Olvidé mencionarte que también puedes poner el componente en tiempo de diseño y los valores de sus propiedades desde el Object Inspector, ahorrándote el código de inicialización.

Y por último me queda sugerirte que intentes de este modo:
Código Delphi [-]
uses Urlmon;

procedure DownloadFile(const url, target: string);
begin
  URLDownloadToFile(nil, PChar(url), PChar(target), 0, nil);
end;

Ejemplo de uso:
Código Delphi [-]
...
begin
   DownloadFile('ftp://ftp.freenet.de/pub/filepilot/ss_sa', 'c:\tmp\ss_sa');
...

Saludos

Edito: No había visto el mensaje de Neftali pero seguramente ajustando esa propiedad desaparezca la excepción.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 28-04-2015 a las 15:08:16.
Responder Con Cita