Урок на делфи 94. Вывод эскизов рисунков вместо значков

Задание на Delphi. Делаем предварительный просмотр рисунков. #delphi , #chrome для выполнение задачи использовал компоненты и функции Button1, TImage, TListView, TImageList, TDirectoryListBox