Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.31;
Скачать: 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 вся ветка

Текущий архив: 2003.07.31;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
6-100862
Chieftain
2003-05-26 18:10
2003.07.31
Пересылка файлов по INET


1-100703
MTS
2003-07-16 09:39
2003.07.31
Printer и размер бумаги


1-100687
denis24
2003-07-18 10:58
2003.07.31
вычисление новой даты


14-100922
RomanS
2003-07-14 04:09
2003.07.31
Несколько серьезных вопросов по программированию 3D графики


14-100987
MishaS
2003-07-15 17:51
2003.07.31
Delphi не вдит переменную