Delphi - Coger la ruta de una imagen

Hola,

estoy intentado coger la ruta de una imagen para poder mostrarla despues en una pagina HTML.

Estoy probando con esto:

imagen:= (Formulario.Controls[i] as TImage).Picture.SaveToFile(nombreimagen)

las dos variables son strings pero me da un error de incompatibilidad de tipos.

No se si hay otra forma de coger la ruta, soy un poco novato en esto.

Un atento saludo y gracias.

Estas seguro que el Controls[i] ES una TImage?

Deberias usar mejor

//Verificar si es o no una clase TImage
if Formulario.Controls[i] Is TImage then
//Es TImage, guardar en disco...
begin
(Formulario.Controls[i] as TImage).Picture.SaveToFile(nombreimagen) ;
end;

Pero hay que notar que SaveToFile es un metodo y NO devuelve la ruta de la imagen.

Entonces ¿cual es la ruta? Si la variable NombreImagen no contiene la ruta, por ejemplo tiene "MiImagen.bmp", la ruta es ExtractDir(Application.ExeName)+"\"+NombreImagen.

Listo?