Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Cargar en un Timage una imgen que esta en internet (https://www.clubdelphi.com/foros/showthread.php?t=60669)

gulder 09-10-2008 18:06:55

Cargar en un Timage una imgen que esta en internet
 
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 09-10-2008 18:10:43

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 09-10-2008 18:25:26

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 09-10-2008 19:31:10

gracias roman si que funciona saludes gulder


La franja horaria es GMT +2. Ahora son las 21:26:20.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi