![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Загрузка иконок [D7, Win95/98, Win2k, WinXP]
МитяЙ2 © (2003-03-30 11:41:00)Так можно загрузить иконку для зарегистрированного типа файла (в примере для *.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;
т.к. мы не знаем путь к иконке и её номер. А через реестр не всегда можно узнать путь к иконке
для определенного типа файла (убедился на собственном опыте).
МитяЙ
МитяЙ2 (2003-03-30 16:50:00) [1]Song, и без C:\windows\ не работает.
Но вот посмотри:
http://rsdn.ru/Forum/Message.aspx?mid=228194
Этот совет мне помог.
Song (2003-03-30 13:57:00) [2]А зачем C:\windows\ ? :)
Митяй2 (2003-03-30 12:41:00) [3]Если писать
ExtractAssociatedIcon(HInstance,Pchar("c:\windows\*.txt", W);
то handle вообще не возвращает!
Song (2003-03-30 12:14:00) [4]Дык напиши *.txt