[morebeauty]

Делаю весьма специфичный файловый менеджер. Требуется отображать определенные файлы с определенными опциями отображения/запуска. Все готово, кроме одного интерфейсного решения. А именно. Есть ImageList, в котором зашиты иконки для отображаемых файлов. Определенные файловые маски соответствуют определенным иконкам. Но требуется еще, чтобы при выборе некой дефолтной иконки (например с индексом 0), ListView отображал виндовую иконку, соответствующую данному файлу (либо это зашитая в сам файл (например ЕХЕ) используемая икона, либо это икона приложения, с которым ассоциируется файл).
Некоторые способы получения иконки я уже нашел (хотя часть весьма заморочены, так что не откажусь и от такой помощи), но я не знаю как их применить и итемам.
Пока что при создании итема я делаю так

Код:

ListView1.Items[i].ImageIndex := IconIndex //integer

то есть выбираю одну из иконок в соответствующем ImageList. А как итему присвоить картинку не из этого списка?

[M.A.D.M.A.N.]

Наполнять лист нужными иконками. Вообще какая-то странная задача. Можно же ShellListView использовать.

[NumLock]

первой иконкой (индекс == 0) в TImageList добавить иконку по-умолчанию. далее по мере извлечения из файлов.

[morebeauty]

Наполнять лист нужными иконками. Вообще какая-то странная задача. Можно же ShellListView использовать.

Я в условии написал, почему не могу использвать шелл

Определенные файловые маски соответствуют определенным иконкам

Как объяснить подробнее я не знаю без наводящих вопросов. Да это вам и не нужно. Однако суть задачи я рассказал вполне подробно.

Некоторые способы получения иконки я уже нашел (хотя часть весьма заморочены, так что не откажусь и от такой помощи), но я не знаю как их применить к итемам.

[morebeauty]

первой иконкой (индекс == 0) в TImageList добавить иконку по-умолчанию. далее по мере извлечения из файлов.

Заполнение TImageList не подходит. Иначе все награбленные иконки появляются в настройках программы, а это недопустимо.

Было неплохо ,если бы у итемов было свойство ListView1.Items[i].Picture.Bitmap (TBitmap), но такого свойства я не нашел.

[NumLock]

можно легко убрать появление награбленных иконок в настройках программы. достаточно к настр. прикрутить другой список. я проверял - это работает.

Сообщение от morebeauty

Было неплохо ,если бы у итемов было свойство ListView1.Items[i].Picture.Bitmap (TBitmap), но такого свойства я не нашел.

сделай ручное отображение элементов списка. я проверял - это работает

[M.A.D.M.A.N.]

Сообщение от morebeauty

Я в условии написал, почему не могу использвать шелл

Сори, читаю по диагонали.

[morebeauty]

сделай ручное отображение элементов списка. я проверял - это работает

Я тоже проверял. Работает, но порой криво (что нибудь, да забуду предусмотреть )
Есть способ проще?

[NumLock]

см. третье сообщение - это проще простого.