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