Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Иконка из exe


Alekzzzz ©   (2004-10-11 09:37:00) 

Как вытащить из exe файла иконку, да ещё так чтоб она показалась в Image1. Известен только var exefile:string!!!!


Думкин   (2004-10-11 09:56:00) [1]

http://delphibase.endimus.ru/?action=viewfunc&topic=filelink&id=10061


begin...end   (2004-10-11 09:52:00) [2]

ImageName.Picture.Icon.Handle := ExtractIcon(HInstance, PChar(exefile), 0);


Rentgen   (2004-10-11 09:50:00) [3]

Или я не понял чего тебе надо...?!


Rentgen   (2004-10-11 09:49:00) [4]


> Alekzzzz   (11.10.04 09:44) [2]
> var exefile:string!!!!

А вчем проблема?
...
var
yIcon:TIcon;
Icon:HICON;
...
Icon:=ExtractIcon(HInstance, PChar(exefilename),0);
yIcon:=TIcon.Create;
yIcon.Handle:=Icon;


begin...end   (2004-10-11 09:45:00) [5]

Товарищ не понимает.


Alekzzzz   (2004-10-11 09:44:00) [6]

var exefile:string!!!!


Rentgen   (2004-10-11 09:42:00) [7]

ExtractIcon.


Наверх

Титульная страница Поиск, карта сайта Написать письмо