Да, подошло, сделал через MessageBox в FormCloseQuery.
Теперь другая проблема: как загрузить .jpg/.jpeg в TImage? Прописал в библиотеках jpeg.hpp, всёравно не загружает, пишет, что неизвестный формат. Подскажите пожалуйста