Системные иконки

← →
Slaviq (2001-11-06 17:55) [0]

Как узнать системную иконку файла, (например если файл текстовый то иконка соответственно как на текстовик...)
Пытаюсь TSHGetFileInfo но чегото не получается, только из экзешников :(. Помогите пожалуйста умной мыслью, буду рад любым предложениям.
Ответы желательно слать на мыло (не успеваю на форуме посмотреть)
Всем отозвавшимя ОГРОМНОЕ СПАСИБО!

← →
Olgerd © (2001-11-06 19:46) [1]

Попробуй ExtractAssociatedIcon

← →
SlaViQ (2001-11-07 16:23) [2]

Я не понимаю что делать дальше, функция возвращает значение ВОРД, а чего с ним дальше делать, мне нужна готовая картинка БМП или ИКО.
Я просто не дружен с ВинАПИ, больше по БД, помоги пожалуйста разобраться.
Зарание благодарен. Славик.

ExtractIcon;
.... .... var Ico: HICON; begin Ico:=ExtractIcon(HInstance,Filename,0 or 1); //Возвращает HICON (Хендл иконки), FileName-имя файла
Image1.Picture.Icon.Handle:=Ico; //Image1-твой Image(component)
....
....
end;

Системные иконки Найти похожие ветки