Ver Mensaje Individual
  #1  
Antiguo 17-04-2009
Bertifox2008 Bertifox2008 is offline
Miembro
 
Registrado: jul 2008
Posts: 85
Reputación: 16
Bertifox2008 Va por buen camino
Error Unknown Protocol componente IdHTTP de Indy

Estoy tratando de hacer funcionar un ejemplo de como cargar una imagen alojada en un sitio web en un TImage, con la ayuda de roman (moderador), consegui el siguiente codigo, hice algunos cambios, pero me arroja el error indicado.

He buscado y encontre que a este componente es necesario indicar host y puerto, pero estas propiedades no aparecen en el componente, se las indique por codigo y da error, estoy utilizando D2007 Indy version 10 o 11 no estoy claro.

Gracias de antemano


Código Delphi [-]
procedure TFrm_MyFirstConexionRemota.ButtonFoto1Click(Sender: TObject);
var
  Stream: TMemoryStream;
  JpegImage: TJpegImage;
begin
  Stream := nil;
  JpegImage := nil;

  try
    if WinInet.InternetGetConnectedState( nil, 0 ) then
    begin
    Stream := TMemoryStream.Create;
    JpegImage := TJPegImage.Create;
    //IdHTTP1.Host:='174.133.82.7';
    //IdHTTP1.Port:=80;
    IdHTTP1.Get('http:/www.intelsoft.cl/imagenes/foto1.jpg', Stream);
    Stream.Seek(0, soFromBeginning);
    JPegImage.LoadFromStream(Stream);
    ImageFoto.Picture.Assign(JPegImage);
    IdHTTP1.Free;
    end
    Else
      Showmessage('No esta conectado a Internet');
  finally
    Stream.Free;
    JPegImage.Free;
  end;
end;
Responder Con Cita