使用SHGetFileInfo函数获取任何文件大图标
来源:互联网 发布:java删除文件失败 编辑:程序博客网 时间:2024/05/16 05:37
为了实现在vista和更高版本的系统中能够获取任何文件的大图标(48*48像素,甚至256*256像素),真是找了很多资料,最终经过朋友的帮忙找到了实现方法。
网络中有很多获取exe大图标的方法,可惜不能获取所有文件的,有使用ExtractIcon函数也有介绍使用注册表实现的,经过仔细测试,最终采用SHGetFileInfo函数。SHGetFileInfo的使用方法网上资料很多,但是真正能实现48*48图片采集的功能也不容易。
以下博文内容转自网络。
uses ShellAPI, CommCtrl;const SHIL_LARGE = 0; {32x32} SHIL_SMALL = 1; {16x16} SHIL_EXTRALARGE = 2; {48x48} SHIL_SYSSMALL = 3; {16x16} SHIL_JUMBO = 4; {256x256}function GetFileIconEX(AFile: string; ASHIL_FLAG: Cardinal): HICON; function _X: Boolean; {判断是否符合系统版本} begin Result := False; if Win32MajorVersion < 5 then Exit; if (Win32MajorVersion = 5) and (Win32MinorVersion < 1) then Exit; Result := True; end;type _SHGetImageList = function (iImageList: Integer; const riid: TGUID; var ppvObj: Pointer): HResult; stdcall;var nHandle: THandle; nImageList: HIMAGELIST; nSHGetImageList: _SHGetImageList; nFileInfo: TSHFileInfo;const IID_IImageList: TGUID = '{46EB5926-582E-4017-9FDF-E8998DAA0950}';begin Result := 0; nHandle:= LoadLibrary('Shell32.dll'); nImageList := 0; if nHandle <> S_OK then try nSHGetImageList := GetProcAddress(nHandle, PChar(727)); if Assigned(nSHGetImageList) and _X then nSHGetImageList(ASHIL_FLAG, IID_IImageList, Pointer(nImageList)); finally FreeLibrary(nHandle); end; if nImageList > 0 then begin SHGetFileInfo(PChar(AFile), FILE_ATTRIBUTE_NORMAL, nFileInfo, SizeOf(TSHFileInfo), SHGFI_SYSICONINDEX); Result := ImageList_GetIcon(nImageList, nFileInfo.iIcon, ILD_NORMAL); end;end;
阅读全文
0 0
- 使用SHGetFileInfo函数获取任何文件大图标
- SHGetFileInfo函数 获取系统文件类型及图标
- SHGetFileInfo函数 获取系统文件类型及图标
- SHGetFileInfo函数 获取系统文件类型及图标
- 获取文件图标,类型名称,属性 SHGetFileInfo
- 收藏——在C#使用SHGetFileInfo获取(管理)文件或者文件夹图标(C#封装Win32函数的一个例子)
- SHGetFileInfo获取图标说明
- SHGetFileInfo获取系统图标注意事项
- SHGetFileInfo(获取文件信息)
- 【MoreWindows工作笔记4】 获取文件图标,类型名称,属性 SHGetFileInfo
- 获取给定路径的图标,演示SHGetFileInfo用法
- SHGetFileInfo()函数
- SHGetFileInfo函数
- SHGetFileInfo函数
- SHGetFileInfo函数
- SHGetFileInfo函数
- SHGetFileInfo 显示文件类型图标
- SHGetFileInfo 获得文件类型图标
- C#调用sap rfc 接口
- 依存句法分析和语义依存分词的区别
- pagehelper
- Informatica基础系列(三)——表达式、筛选、查找组件
- UVA
- 使用SHGetFileInfo函数获取任何文件大图标
- MySQL数据库安装与配置详解
- java调用Python遇到的一系列问题
- 大学生职业生涯规划
- sqlserver中如何模糊查找表名或存储名等等?利用sys.objects
- 《深入分析Java Web技术内幕》学习(二)
- Rectified Linear Units, 线性修正单元激活函数
- Test
- [poj1734]Sightseeing trip(Floyd)