![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как получить иконку ехе файла? [D5, WinXP]
F1 © (2004-10-05 16:25:00)Тоесть допустим у меня есть значек Халф Лайф, мне надо вывести его изображение на форму. Подскажите процедурку.
Спасибо.
F1 (2004-10-05 18:41:00) [1]olookin
Большое спасибо
olookin (2004-10-05 17:56:00) [2]Так ведь сказали же - ExtractAssociatedIcon или ExtractIcon. Попробуйте.... Вот небольшой пример - вместо im[n] используйте просто Image1. Уверяю, что иконку халвы он выцепляет:
procedure TForm1.Button1Click(Sender: TObject);
var r: array [0..1000] of char;
begin
if opendialog1.execute then begin
strpcopy(r,opendialog1.filename);
im[n]:=TImage.Create(Form1); im[n].Parent:=ScrollBox1;
im[n].width:=32; im[n].height:=32;
im[n].left:=10+32*w+w*10; im[n].top:=10;
im[n].Picture.icon.handle:=ExtractIcon(Hinstance,r,0);
Inc(w); Inc(n); end;
end;
F1 (2004-10-05 17:50:00) [3]Мне не надо програма :cry: Я хочу знать как это сделать програмно.
Amoeba (2004-10-05 17:47:00) [4]IrfanView - это БЕСПЛАТНАЯ и компактная программа типа ACDSee.
http://www.irfanview.com/
F1 (2004-10-05 17:42:00) [5]Jay: если не трудно, подробней, что такое irfanview и как им вытащить?
Если это программа которая вытаскивает из екзе файле иконку то не подходит, меня интересует как это програмно сделать.
Jay (2004-10-05 17:13:00) [6]Вытащи чем-то вроде irfanview иконку, потом уже используй в программе
F1 (2004-10-05 17:01:00) [7]Есть путь к ехе файлу типа D:\Games\hl.exe надо вывести а форму его иконку.
DesWind (2004-10-05 16:49:00) [8]Не понял у тебя уже есть иконка или ее надо получить?
DesWind (2004-10-05 16:44:00) [9]ExtractAssociatedIcon