Иконка из exe

← →
Alekzzzz (2004-10-11 09:37) [0]

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

← →
Rentgen © (2004-10-11 09:42) [1]

ExtractIcon.

← →
Alekzzzz (2004-10-11 09:44) [2]

var exefile:string!!!!

← →
begin...end © (2004-10-11 09:45) [3]

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

← →
Rentgen © (2004-10-11 09:49) [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;

← →
Rentgen © (2004-10-11 09:50) [5]

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

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

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

Иконка из exe Найти похожие ветки