Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

иконку из ехе в файл   Найти похожие ветки 

 
KosilkA ©   (2004-02-17 13:23) [0]

подскажите если можите :) Как сохранить иконку полученную из ехе в файл типа ".ico" ? Но при этом не используя методы отображения на форме с последующим сохранением битмапа , этих примеров в сети предостаточно... Желательно на winAPI .. Я замучился. Получаю HICON , а что ж дальше с ним делать,как из него выцепить данные я не совсем понимаю :-(


 
UnMi   (2004-02-17 15:51) [1]

Примерно так:
uses  ShellApi;

procedure....();
var
FileInfo:TSHFileinfo;
Hico:HIcon;
icon:TIcon;
begin

SHGetFileInfo(PChar("c:\MyProg.exe"), 0, FileInfo,          SizeOf(FileInfo),SHGFI_ICON or SHGFI_LARGEICON);

Hico:=FileInfo.hIcon;
Icon:=TIcon.Create;
Icon.Handle:=HIco;
Icon.SaveToFile("c:\ 1.ico");
end;


 
Rouse_ ©   (2004-02-17 16:19) [2]

+ Icon.Free;


 
KosilkA ©   (2004-02-17 16:47) [3]

а без TIcon можно ? т.е. , без модуля graphics ?


 
KosilkA ©   (2004-02-17 16:56) [4]

p.s.: в общем , я имею HICON (хэндл иконки полученный из длл/ехе -файла) , что я могу сделать с ним , чтобы выудить саму иконку , сохранить ее в файл? без graphics ...


 
KosilkA ©   (2004-02-17 16:58) [5]

P.P.S.: ...и без classes тоже ! в общем , на winAPI


 
Xerx ©   (2004-03-28 22:33) [6]

Но ведь сохраняется иконка в 16 цветов! А как можно в 24b или 32b?


 
Cobalt ©   (2004-03-29 23:01) [7]

2 KosilkA ©  
Самый простой метод - лезешь в модуль graphics и смотришь исходники.



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

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

Наверх




Память: 0.48 MB
Время: 0.028 c
6-1080481375
Diz
2004-03-28 17:42
2004.05.16
Проблемы с POP3


8-1077199677
Bmouradov
2004-02-19 17:07
2004.05.16
Как на Canvas рисовать сглаженные прямые, окружности и т.п.?


1-1082530762
Смертник
2004-04-21 10:59
2004.05.16
Помогите пожалуйста с DLL


1-1083329703
Виктор
2004-04-30 16:55
2004.05.16
Reset(Vf1, 1) пишет acces denied на ресурсе read-only


4-1080740994
Lobster
2004-03-31 17:49
2004.05.16
Как добавить русский язык в Windows?