易语言提取程序图标以16*16的大小显示在超级列表框里,请问怎么写??
1个回答
展开全部
显示在列表框就不说了,提取图标源码直接奉献是个子程序。
.版本 2
.支持库 iext2
.子程序 取文件图标, 字节集, 公开, 提取成功后会返回一个图标数据 失败返回空字节集
.参数 文件名, 文本型, , 文件的路径
.参数 是否取大图标, 逻辑型, 可空, 如果为真则取大图标(32×32) 为假则取小图标(16×16) 默认为真
.局部变量 图片组, 字节集
.局部变量 图片索引, 整数型
.局部变量 提取大图标, 逻辑型
.局部变量 图片数据, 字节集
.如果 (文件名 ≠ “”)
.如果 (是否为空 (是否取大图标) 或 是否取大图标 = 真)
提取大图标 = 真
图片组 = 建空图片组 (32, 32)
.否则
提取大图标 = 假
图片组 = 建空图片组 (16, 16)
.如果结束
图片索引 = 提取加入图片 (图片组, 文件名, , 取反 (提取大图标))
图片数据 = 取图片组图片 (图片组, 图片索引, )
返回 (图片数据)
.否则
返回 ({ })
谢谢采纳
.版本 2
.支持库 iext2
.子程序 取文件图标, 字节集, 公开, 提取成功后会返回一个图标数据 失败返回空字节集
.参数 文件名, 文本型, , 文件的路径
.参数 是否取大图标, 逻辑型, 可空, 如果为真则取大图标(32×32) 为假则取小图标(16×16) 默认为真
.局部变量 图片组, 字节集
.局部变量 图片索引, 整数型
.局部变量 提取大图标, 逻辑型
.局部变量 图片数据, 字节集
.如果 (文件名 ≠ “”)
.如果 (是否为空 (是否取大图标) 或 是否取大图标 = 真)
提取大图标 = 真
图片组 = 建空图片组 (32, 32)
.否则
提取大图标 = 假
图片组 = 建空图片组 (16, 16)
.如果结束
图片索引 = 提取加入图片 (图片组, 文件名, , 取反 (提取大图标))
图片数据 = 取图片组图片 (图片组, 图片索引, )
返回 (图片数据)
.否则
返回 ({ })
谢谢采纳
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询