Главная страница
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.015 c
14-67960
Карелин Артем
2003-07-03 15:10
2003.07.21
Программирование под Win CE на дельфи.


14-67969
Sergey26
2003-07-05 17:39
2003.07.21
Палитра компонентов


14-67983
Tornado
2003-07-03 16:33
2003.07.21
:))))


14-68008
Evgeniy
2003-07-04 09:33
2003.07.21
Распознавание текста


14-68007
Empleado
2003-07-04 12:39
2003.07.21
Опять пятница ... :)