Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Иконка ассоциируемого приложения. [D6, WinXP]


kalishenko ©   (2004-06-14 12:06:00) 

Как получить иконку файла (не .dll, .res, .exe и т.п.)? Т.е. на  самом деле, мне нужна иконка ассоциируемого с этим файлом приложения (так, как это делает Винда в explorer.exe).


kalishenko   (2004-06-14 17:44:00) [1]

>>SeregaT

Спасибо!


SeregaT   (2004-06-14 16:57:00) [2]

используй модуль shellapi;
Там есть функция ExtractAssociatedIcon. Если ей передать exe и т. п., то она вернет иконку из нее (не твой случай). А вот если это файл другого типа, то она выдернет иконку у ассоциированного приложения.
Описание:
function ExtractAssociatedIcon(hInst: HINST; lpIconPath: PChar;
 var lpiIcon: Word): HICON; stdcall;
hInst: указатель на твой Application
lpIconPath: файл, для которого нужна иконка
lpiIcon: если не exe, то не используется
возвращает: указатель на иконку.


Наверх

Титульная страница Поиск, карта сайта Написать письмо