Vista previa de imagenes en una aplicacion

[ecfisa]

Empezado por Gerson12

@eficsa
amigo disculpa pero en donde puedo encontrar este componente TIdHTTP (pestaña Indy Clients) que tu señalas seria de mucha ayuda y gracias por tu preciada ayuda

Hola Gerson12.

Tendrías que tenerlo en la pestaña mencionada, pero si no podes ubicarlo, intentá desde la barra de menu de Delphi: View -> Component list. Y en la ventana que aparecerá, escribir su nombre en Search by name.

Saludos.

[Gerson12]

bueno eficta disculpa por la molestia pero aun sigo sin encontrar tal opcion porfavor me puedes dar una imagen si no es mucha molestia y realmente te pido disculpa espero me puedas ayudar

[Casimiro Noteví]

¿No encuentras la pestaña Indy clients, o no encuentras el componente TIdHTTP en la pestaña indy?

[[escafandra]]

Si quieres prescindir de las indi, puedes usar este código:

Código Delphi [-]
uses Urlmon;
//...........................................................................
procedure LoadURLImage(Image: TImage; URL: String);
var
  TempName: String;
begin
  TempName:= 'temp' + ExtractFileExt(URL);
  URLDownloadToFile(nil, PCHAR(URL), PCHAR(TempName), 0, nil);
  Image.Picture.LoadFromFile(TempName);
  DeleteFile(TempName);
end;

Uso:

Código Delphi [-]
LoadURLImage(Image1, 'http://telmosilva.files.wordpress.com/2010/03/informatica_12.jpg');

Saludos.