Ver Mensaje Individual
  #16  
Antiguo 06-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Cita:
Empezado por madiazg
me ha interesado mucho el código que has insertado en un mensaje anterior. Soy novato en esto del delphi y hace tiempo que necesitaba una forma fácil de descargar ficheros de internet.
Bueno. Bienvenido al ClubDelphi, en primer lugar. Deja que te diga que yo no sé mucho de los componentes Indy: a poco que te pusieras a buen seguro me aventajarías en ello.

Tal vez te interese saber que existen no pocos componentes que te ayudarán a descargar archivos de Internet, no solamente los mencionados. Si buscas en Torry's Delphi Pages, por poner un caso, encontrarás.

Puede que te interese también descargar e instalar la Jedi Library. Entre los componentes que incluye encontrarás algunos para hacer lo que precisas: con ejemplos de uso todos ellos.

Cita:
Empezado por madiazg
Si eres tan amable, ¿puedes indicarme cómo puedo modificar dicho código para que en el caso de que el fichero que quiero bajarme no exista me salga un mensaje de Error?
Sí; hasta ahí llegamos, aunque puede que no acertemos del todo, tal vez bastaría con capturar la posible excepción que se produjera en caso de que, por ejemplo, el archivo a descargar, o sea, la URL del mismo no existiera. Bastaría con algo así:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 var
  http: TIdHTTP;
  temp: TFileStream;
 begin
  http := TIdHTTP.Create(Self);
  temp := TFileStream.Create('C:\clubdelphi.css', fmCreate);
  try
    try
      http.Get('http://www.clubdelphi.com/foros/noexiste.css', temp);
    except
      on E: Exception do begin
        // Aquí puedes actuar en caso de
        // producirse una excepción/error
      end;
    end;
  finally
    http.Free;
    temp.Free;
  end;
 end;
Cita:
Empezado por madiazg
¿Sabes de algún documento o alguna WEB donde expliquen en castellano las Indy?
Pues, la verdad, aparte de la documentación que puede descargarse en la página Web de los componentes (en inglés, of course) lo cierto es que buscando en Google no parece haber demasiada que digamos.

Ya te digo que tal vez podrías pensar en otros componentes que no fueran los Indy, o, cuando menos, dedicarte a algún componente en concreto de los que se incluyen entre ellos (tal vez yo mismo no usé el más adecuado para descargar archivos) y si, faltalmente, ha de ser en inglés, sírvate de consuelo que será un componente o dos y no todos ellos los que tendrás que acometer.

Por otro lado si te indico los componentes que incluye la Jedi Library para descargar archivos de Internet es porque son bastante sencillos de utilizar: una URL, el archivo de destino, un método "Start", otro "Cancel", eventos "OnProgress", "OnTerminate" y poco más: lo justo, suficiente y necesario para descargar archivos de Internet.

Lamento no poder decirte otra cosa, por el momento. Si te surge cualquier otra duda y está relacionada con este Hilo, adelante con ella; si te surge otra y aun otras que no tengan que ver no temas iniciar otro Hilo con ellas que a buen seguro aquí tratará de ayudársete. Y, de nuevo, bienvenido al ClubDelphi
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita