TImage saber extension

[el_enigma1]

Empezado por ISKANDAR

Hola, puedes usar la función:

Código Delphi [-]
 ExtractFileExt(Imagen)

donde Imagen es un string que contiene el nombre de archivo.

Ok, ya lo habia hecho mediante una cadena pero queria saber si el componente podia darmelo, pero la funcion que me das me simplifica el procedimiento que hacia antes, muchas gracias.