Cargar en un Timage una imgen que esta en internet

[gulder]

hola foro como andan aqui con una pequeña duda como hago para cargar en un Timage una imagen que tengo alojada en un servidor de imagenes en internet de antemano gulder

NOTa: utilizo delphi 7 y el servidor de imagenes es Servidor de imagenmes

[roman]

No creo que el TImage esté preparado para eso. Tendrás que descargar primero la imagen (con Indy o WinInet) a tu disco y desde ahi cargarla al TImage.

Otra opción sería usar un TWebBrowser para mostrar la imagen, ahí sí, directamente.

// Saludos

[roman]

Un ejemplo con Indy para cargar un JPG en un Image:

Código Delphi [-]
var
  Stream: TMemoryStream;
  JpegImage: TJpegImage;

begin
  Stream := nil;
  JpegImage := nil;

  try
    Stream := TMemoryStream.Create;
    JpegImage := TJPegImage.Create;

    IdHTTP1.Get('http://url/de/la/imagen.jpg', Stream);
    Stream.Seek(0, soFromBeginning);
    JPegImage.LoadFromStream(Stream);

    Image1.Picture.Assign(JPegImage);
  finally
    Stream.Free;
    JPegImage.Free;
  end;
end;

De esta forma, usando streams, evitas tener que guardar la imagen en disco.

// Saludos

[gulder]

gracias roman si que funciona saludes gulder