Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.21;
Скачать: CL | DM;

Вниз

Загрузка иконок   Найти похожие ветки 

 
МитяЙ2 ©   (2003-03-30 11:41) [0]

Так можно загрузить иконку для зарегистрированного типа файла (в примере для *.txt):


W:=0; { Word }
Image1.Picture.Icon.Handle:=ExtractAssociatedIcon(HInstance,Pchar("c:\windows\setuplog.txt", W);


Но она будет размером 32x32. Как загрузить иконку размером 16x16, НЕ используя


ExtractIconEx(PChar(<Путь к иконке>), num_icon,IconLarge,IconSmall,1);
LIcon.Handle:=IconSmall;


т.к. мы не знаем путь к иконке и её номер. А через реестр не всегда можно узнать путь к иконке
для определенного типа файла (убедился на собственном опыте).

МитяЙ


 
Song ©   (2003-03-30 12:14) [1]

Дык напиши *.txt


 
Митяй2 ©   (2003-03-30 12:41) [2]

Если писать


ExtractAssociatedIcon(HInstance,Pchar("c:\windows\*.txt", W);


то handle вообще не возвращает!


 
Song ©   (2003-03-30 13:57) [3]

А зачем C:\windows\ ? :)


 
МитяЙ2 ©   (2003-03-30 16:50) [4]

Song, и без C:\windows\ не работает.

Но вот посмотри:
http://rsdn.ru/Forum/Message.aspx?mid=228194
Этот совет мне помог.



Страницы: 1 вся ветка

Текущий архив: 2003.07.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
7-68098
Valeris
2003-05-13 18:33
2003.07.21
Удаление файлов


14-68024
Dmitriy O.
2003-07-04 08:08
2003.07.21
Наставления злобного юзера.


1-67872
BillyJeans
2003-07-08 09:42
2003.07.21
TCheckListBox и его OnDrawItem...


7-68093
Berzercer
2003-05-13 16:57
2003.07.21
УБРАТЬ иконку из ALT-TAB


7-68078
Uncle Archi
2003-05-06 23:51
2003.07.21
Список процессов.