Вниз
Скачать: CL | DM;

Как загрузить иконку из ресурса exe файла, зная её ID?   Найти похожие ветки 

← →
Interested   (2003-07-16 17:36) [0]

Есть EXE файл с ресурсами иконками.
Как загружать эти иконки на компонент Image, зная ResourceID каждой из них?

Желательно с примером.
Спасибо.


← →
Юрий Федоров ©   (2003-07-16 17:51) [1]

var Icon: TIcon;
Icon:=TIcon.Create;
try

Icon.handle:=LoadIcon(hInstance, "идентификатор_в_ресурсе");
...
finally
Icon.Free;
end;


← →
Иван Шихалев ©   (2003-07-16 18:59) [2]

Я так понимаю, речь идет о иконках в чужом exe? LoadIcon не поможет. Поможет FindResource -> LoadResource -> ... -> LoadImage.

Там где многоточие - поиск соответствующей части иконки. Как конкретно делается - сейчас не вспомню, но в справке по WinAPI все, естественно, есть.


← →
Interested   (2003-07-16 23:18) [3]

Следующий код иконку с ID 101 в Image1 не загружает:

var Icon1: TIcon;
begin
Icon1:=TIcon.Create;
try
Icon1.handle:=LoadIcon(hInstance,"101");
Image1.Picture.Icon.Assign(Icon1);
finally
Icon1.Free;
end;
end;

Как быть?



← →
Eliminator   (2003-07-16 23:20) [4]


> Я так понимаю, речь идет о иконках в чужом exe? LoadIcon
> не поможет. Поможет FindResource -> LoadResource -> ...
> -> LoadImage.

Речь идёт о родном exe программы.


← →
Interested   (2003-07-16 23:21) [5]

Да, exe самой программы...


← →
Chlavik ©   (2003-07-17 02:49) [6]

Может TRresourceStream заюзать?


← →
Иван Шихалев ©   (2003-07-17 07:05) [7]

var Icon1: TIcon;
begin
Icon1:=TIcon.Create;
try
Icon1.handle:=LoadIcon(hInstance, PChar(101));
Image1.Picture.Icon.Assign(Icon1);
finally
Icon1.Free;
end;
end;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
3-100608
Alfred77777
2003-07-09 15:40
2003.07.31
is not a valid floating point value


14-100951
antonyan
2003-07-15 14:23
2003.07.31
Контрольная сумма файла


4-101026
dimonf
2003-05-28 11:02
2003.07.31
Подскажите какая функция в API отвечает за вывод PopupMenu???


14-100925
Nikolay M.
2003-07-08 10:04
2003.07.31
Самая популярная ветка за историю существования форума - ?


4-101023
Lefan
2003-05-27 06:27
2003.07.31
Закрыть программу




   Наверх