Bajar imagen de FTP

[rruffino]

Hola gente, estoy tratando de que cuando inicie mi aplicación se conecte a un ftp y baje una imagen y la cargue a un componente TImage pero no encuentro como bajar la imagen y pasarla al componente. Si he podido conectarme al sitio ftp y ver el contenido pero no puedo traer la imagen.
Agradezco si alguien me da una mano. Muchas gracias!!!

[ecfisa]

Hola.

Revisá este enlace Descargando archivos por FTP con INDY

Una vez que tengas el archivo en disco basta con que hagas:

Código Delphi [-]
  ...
  Image1.Picture.LoadFromFile('Unidad:\Ruta\Archivo.JPG'); 
  ...

Lógicamente 'Unidad:\Ruta\Archivo.JPG' deberás reemplazarlo por la unidad, ruta y nombre de archivo en que fué descargada la imágen.

Saludos.

[[escafandra]]

Y sin indy:

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;

Ejemplo de uso:

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

Saludos.

[rruffino]

Gracias gente, he podido hacerlo. Muchas gracias por la ayuda!