Ver Mensaje Individual
  #15  
Antiguo 30-04-2007
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:
más onde está o ficheiro download? (googledestokp?)
Si te entiendo bien te sorprende que descargamos el archivo (googledesktop.exe) pero este no aparece en ningún lado... y esto es porque únicamente lo descargamos "en memoria", pero, luego no lo guardamos a ningún archivo. Ten en cuenta que se trataba sólo del ejemplo, de ver funcionar a las barras de progreso, pero, nada más.

Adjunto ahora el mismo ejemplo, modificado para guardar el "googledesktop.exe" que descargamos. En realidad las modificaciones son mínimas y las muestro en negrita aquí:

Código Delphi [-]
procedure TfrmPrincipal.btnDescargaClick(Sender: TObject);
var
  fs: TFileStream;
begin
  btnDescarga.Enabled := false;
  try
    fs := TFileStream.Create(rsRutaArchivo, fmCreate);
    try
      IdHTTP.Get(rsUrlDescarga, fs);
    finally
      fs.Free;
    end;
  finally
    btnDescarga.Enabled := true;
  end;
  ShowMessage(rsFinDescarga);
end;
Archivos Adjuntos
Tipo de Archivo: zip Progreso de tareas con IdHttp.zip (2,6 KB, 26 visitas)
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita