Главная страница
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.034 c
14-68033
Slon
2003-07-03 16:56
2003.07.21
Comp1 -> Money1; Money1 + Money2 -> Comp2


14-67982
Soft
2003-07-01 13:43
2003.07.21
Как сделать кому-то пакость


6-67956
Den_IS01
2003-05-14 13:26
2003.07.21
Принудительно перейти по ссылке в TWebBrouser


4-68115
1g0r
2003-05-20 13:03
2003.07.21
как отловить изменение раскладки в диалоге?


8-67916
MrN
2003-03-29 19:44
2003.07.21
Open(Close)GL