Cargar imagenes desde una url
 

Hola compañeros,

Tengo un Form donde debo de cargar un total de 40 imágenes ".png" de un tamaño de 128x128 desde una lista de enlaces que va cambiando, estoy utilizando este código...

Código Delphi [-]
procedure VerImg(Image: TImage; URL: String);
var
  TempName: String;
begin
   TempName:= ExtractFileExt(URL);
   URLDownloadToFile(nil, PCHAR(URL), PCHAR(TempName), 0, nil);
   Image.Picture.LoadFromFile(TempName);
   DeleteFile(TempName);
end;

El código funciona perfectamente cuando se trata de cargar pocas imágenes, al realizar un for y cargar todas las imágenes el proceso se demora demasiado a pesar de su poco tamaño "8 KB", no se si hay algún componente o método para mostrar las imágenes desde una url mas rápidamente como en el caso de los navegadores web.

Hola,

Creo que te ayudaría llevar a cabo el proceso de descarga desde hilos separados.

Recuerdo bien ese código, lo diseñé para descargar y visualizar una imagen. Para descargar 40, no deberías usar un TImage, quiaás mejor guardarlas en un array o en archivos.

Como apunta dec, lo mejor es usal hilos.


Saludos.

Revisa esta entrada en mi blog. Me parece que es exactamente lo que estás haciendo tú (en el ejemplo con imágenes más pequeñas).

Al final se resuelve con una clase derivada de TThread (como comenta dec) que usa las Indy.

Está el código, así que puedes probarlo o modificarlo según te convenga.

Corrijo el ejemplo y lo subo en breve.
Ahora las imágenes se descargan utilizando HTTPS. Por lo tanto hay que añadir las librerías para SSL y utilizar un componente más para las Indy.
Ya están actualizados los ejemplos (al final de la página).