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

El código que se muestra más arriba puede usarse para guardar en un archivo el documento que estuviera cargado en el componente "TWebBrowser" (a partir de ahora "navegador"). No aparece, pues, ningún diálogo en que se solicite el destino del documento, porque ya se lo indicamos nosotros programáticamente.

Otra cosa es que quieras guardar en un archivo un documento que no se muestre en el "navegador". Por ejemplo, si tratas de mostrar una hoja de estilos (archivos ".css") en el "navegador" (como se basa en Internet Explorer) este te preguntará dónde guardar el archivo en cuestión, o con qué programa abrirlo: porque el "navegador" no puede visualizarlo.

Si es esto a lo que te refieres (no estoy del todo seguro) en lugar de usar el "navegador" para descargar el archivo podrías usar otros componentes para ello: hay no pocos, pero, uno de ellos podría ser el "TIdHttp" de los componentes Indy, que no pone las cosas demasiado complicadas:

Código Delphi [-]
 uses
   IdHTTP; // De los componentes Indy v9
 
 procedure TForm1.Button1Click(Sender: TObject);
 var
   http: TIdHTTP;
   temp: TFileStream;
 begin
   http := TIdHTTP.Create(Self);
   temp := TFileStream.Create('C:\clubdelphi.css', fmCreate);
   try
     http.Get('http://www.clubdelphi.com/foros/delphi.css', temp);
   finally
     http.Free;
     temp.Free;
   end;
 end;
¿Estoy en lo cierto? ¿Te refieres a otra cosa?
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita