download periódico

[roman]

Empezado por tcp_ip_es

se que esta mal pero nunca he utilizado las indy

Tch, tch, ¿no te da vergüenza?

Empezado por tcp_ip_es

que componentes debería utilizar y como los configuraría???

Pues no me dijiste por fin de dónde vas a bajar el archivo (¿ftp, web?)

Empezado por tcp_ip_es

si tienes un ejemplillo por ahi

Ejemplo usando TIdHTTP:

Código Delphi [-]
var
  Stream: TFileStream;
 
begin
  Stream := TFileStream.Create('chela.jpg', fmCreate);
  try
    IdHTTP.Get('http://www.clubdelphi.com/users/roman/chela.jpg', Stream);
  finally
    Stream.Free;
  end;
end;

Si además quieres mostrar una barra de progreso puedes usar los eventos OnWorkBegin, OnWorkEnd y OnWork:

Código Delphi [-]
procedure TForm1.IdHTTPWorkBegin(
  Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCountMax: Integer);
begin
  ProgressBar.Max := AWorkCountMax;
end;
procedure TForm1.IdHTTPWork(
  Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
  ProgressBar.Position := AWorkCount;
end;
procedure TForm1.IdHTTPWorkEnd(Sender: TObject; AWorkMode: TWorkMode);
begin
  ShowMessage('La chela está servida');
end;

Empezado por tcp_ip_es

y me lo puedes mandar por correo te lo agradecería.... ya se que para el buen funcionamiento de los foros se debería exponer el código aqui pero para ver los componentes es mejor en un zip

Lo siento, no me convence tu argumento

// Saludos