1
111222
Unregistered / Unconfirmed
GUEST, unregistred user!
本人编了一个图标搜索器http://guanbh.top263.net/download/allicon.exe
有一点不足:不能区分图标是16色还是其它。
t:Ticon;
t.Handle:=extracticon(handle,pchar(图标文件名),i);
方式1
t.SaveToFile('1.ico'); --->得到16色图标文件1.ico
方式2
image1:=Timage.create(self);
DrawIcon(image1.canvas.Handle,0,0,t.Handle);
image1.picture.SaveToFile('1.ico');--->得到图标文件1.ico的颜色同windows相同。
有一点不足:不能区分图标是16色还是其它。
t:Ticon;
t.Handle:=extracticon(handle,pchar(图标文件名),i);
方式1
t.SaveToFile('1.ico'); --->得到16色图标文件1.ico
方式2
image1:=Timage.create(self);
DrawIcon(image1.canvas.Handle,0,0,t.Handle);
image1.picture.SaveToFile('1.ico');--->得到图标文件1.ico的颜色同windows相同。