Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Como descargar algun archivo en Delphi 5 (https://www.clubdelphi.com/foros/showthread.php?t=69341)

flystar 11-08-2010 19:13:16

Como descargar algun archivo en Delphi 5
 
hermanos.

Debido al poco exito que tuve buscando en los foros, quizas no busque bien.

Solicito auxilio para realizar un programa chico que sirva para bajar 1 archivo
de una URL de Internet y si se puede implementar una barra de progreso pues estaría genial.

Gracias.:D

flystar 11-08-2010 19:27:44

Compartiendo encontre esto:
 
Compartiendo encontre esto, que me fue facil de implementar:

http://www.ajpdsoft.com/modules.php?...rticle&sid=298

usando el primer método que dice ahí,

sin embargo es importante mencionar que cuando lo bajan y lo quieren volver a bajar, baja el del cache, entonces es importante implementar otra funcion que borre el cache y para ello use este:

http://www.delphifaq.com/faq/interne...rer/f847.shtml

primero borran el cache y luego bajan, funcionó de maravilla, lo único malo es que no permite implementar barra de avance para ver como va la descarga.

flystar 11-08-2010 19:44:48

Se necesitan más aportaciones mejoradas.
 
Si alguien se sabe uno que pueda poner barra de avance sería genial

kurono 12-08-2010 04:43:36

te puede sevir este tambien utilizando las indy

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  fs: TFileStream;
begin
  fs := TFileStream.Create('C:\archivo.pdf', fmCreate);
  try
    IdHTTP1.Get('http://www.servidor.com/archivo.pdf', fs);
  finally
    fs.Free();
  end;
end;

flystar 12-08-2010 17:54:28

El codigo anterior marca error
 
El codigo anterior marca error,
loprobaste y te funciono en delphi 5?

kurono 13-08-2010 00:24:29

ese codigo lo utilizo en delphi 7 pero puedes decirme que error te da

flystar 13-08-2010 01:42:46

El codigo anterior marca error
 
Lo que pasa es que quizas las INDY que instale en delphi 5 traen errores

ya me corrieron de la oficina pero al ratito subo el error en una imagen a ver si me sale ponerlo aqui
o te lo comento

kurono 13-08-2010 05:43:38

ok no problem;)


La franja horaria es GMT +2. Ahora son las 00:46:00.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi