Delphi - Modificar nombre a un archivo

Tengo imagenes que tienen el subcodigo de mi producto y quiero hacer un programa que cambie el nombre de las imagenes por el codigo del producto...

Por favor si me pueden ayudar