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.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;