Al borrar un Timage me da error

[epuigdef]

Si utilizas el free del image1 lo estás eliminando de la memoria, debes utilizar el método clear, pero no sé si está a nivel de image1.clear, o image1.picture.clear, o image1.picture.bitmap.clear.

No tengo el Delphi a mano, pruebalo tu mismo.

Edu