Вы можете создать потомка TImageList и добавить туда такую логику.
Поскольку компоненты, ссылающиеся на изображения внутри TImageList, делают это по индексу, было бы проще, чтобы ваш потомок имел свойство ImagePaths типа TStrings, отформатированное так:
#=Filename
И, возможно, также добавить свойство BasePath типа string.
Затем, после загрузки этого компонента, он может автоматически перезагрузить эти изображения в память.
Вы могли бы даже сделать его экспертом во время разработки, который загружает изображения в дизайнер.
- Йерун