Private Type PicBmp
Size As Long
tType As Long
hBmp As Long
hPal As Long
Reserved As Long
End Type
Private Type GUID
Data1 As Long
Data2 As Integer
Data3 As Integer
Data4(7) As Byte
End Type
Private Declare Function ExtractIcon& Lib "shell32dll" Alias "ExtractIconA" (ByVal hInst As Long, ByVal lpszExeFileName As String, ByVal nIconIndex As Long)
Private Declare Function OleCreatePictureIndirect Lib "olepro32dll" (PicDesc As PicBmp, RefIID As GUID, ByVal fPictureOwnsHandle As Long, IPic As Picture) As Long
Private Declare Function ExtractIconEx Lib "shell32dll" Alias "ExtractIconExA" (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long
Private Declare Function DestroyIcon Lib "user32" (ByVal hIcon As Long) As Long
Public Function GetIconFromFile(FileName As String) As Picture
Dim hlargeicon As Long, hsmallicon As Long, selhandle As Long
Dim pic As PicBmp, IPic As IPicture, IID_IDispatch As GUID
selhandle = ExtractIcon(0, FileName, 0)
If selhandle > 0 Then
With IID_IDispatch
Data1 = &H20400
Data4(0) = &HC0
Data4(7) = &H46
End With
With pic
Size = Len(pic)
tType = vbPicTypeIcon
hBmp = selhandle
End With
Call OleCreatePictureIndirect(pic, IID_IDispatch, 0, IPic)
Picture1Picture = IPic
Set GetIconFromFile = IPic
DestroyIcon hsmallicon
DestroyIcon hlargeicon
End If
End Function
Private Sub Form_Load()
SavePicture GetIconFromFile("exe文件路径exe"), "图标路径ico"
End Sub
ICO图标文件如何查看
你确定以“缩略图”或“图标”方式显示不了那ico文件? 全部的ico文件都没法这样显示,是这样可能是该文件损坏了。但是这两种方式能显示jpg、bmp或其他格式的的话,那多半是系统缺少了相关识别程序,你先用查看软件打开一个ico文件,选择“始终用这个程序打开类似文件”,然后再查看试试。
如何制作ICO图标文件如果你要将现有的JPG,GIF等文件制作成图票,你直接用此图标制作工具打开,然后导出图标就可以了。。 记住,图标的后缀名为:ico哦。
制作
方法一,打开ps,直接 新建ctrt+N,新建高宽为256像素大小的图像,(本人亲测,当高宽任一大于256像素的话,保存时都不能为ico格式),控制高宽像素小于256,然后拖进自己的图像,另存为ctrt+shift+s——选择保存ico格式即可,出现对话框,就选择第二个选项。即可
方法二,打开ps,打开自己的,ctrt+alt+i调整图像大小,控制高宽小于256像素,这个也实验过了,当大于256像素时如图:
3
当小于或等于256像素时,如图,那么可以保存了,保存时就有ico格式可以选择,此时文件差不多小于150K
4
选择保存路径后,点击保存,然后选择第二个选项:png(vista)。点击OK即可。(如果选择第一个,那么文件基本是失败
如何提取ico图标文件
ICO 图标可以在线生成
这种网站很多的
后缀是 jpeg等的都可以转换成ICO的!
如何制作 ico图标文件?用PS保存成PNG格式的文件,然后用PNG转ICO工具转换即可。
eclipse 有修改查看ico图标文件的插件吗在初始化init代码中加上这段
ImageIcon ico = new ImageIcon(thisgetClass()getResource("/images/qpng"));替换标题栏图标
Image image = icogetImage();
setIconImage(image);
有ico的图标文件如何桌面图标?工具: IconWorkshop或png2ico
如何让文件查看默认方式为图标先改成图标,然后工具 文件夹选项 查看 应用到所有文件夹 就行了 查看原帖>>
如何提取exe文件的ico图标?我可以帮你!只是我电脑用的是60的IE 如果需要你可以把IE9的EXE文件发过来,我帮你提取图标文件,你留下邮箱我给发过去!
如何通过photoshop制作ico的图标文件PS不能输出ico文件格式的文件,需要网上下载一个输出插件,但是使用有一些限制,建议用专门的ico软件将PS制作好的文件转一下。
以上就是关于VB提取咯exe文件中的图标如何保存为ico文件全部的内容,包括:VB提取咯exe文件中的图标如何保存为ico文件、ICO图标文件如何查看、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)