Question

易语言怎么把源码里的图片资源提取出来

Answer 1

.版本
2
.支持库
iext2
.支持库
eapi
.支持库
xplib
.程序集
窗口程序集1
.程序集变量
图片组,
字节集
.程序集变量
图标索引,
整数型
.子程序
_保存_按钮_被单击
.如果真
(通用对话框1.打开
())
编辑框2.内容
＝
通用对话框1.文件名
＋
“.ico”
.如果真结束
.子程序
_打开__按钮_被单击
.如果真
(通用对话框2.打开
())
输出调试文本
(通用对话框2.文件名)
编辑框1.内容
＝
通用对话框2.文件名
图片组
＝
建空图片组
(32,
32)
图标索引
＝
提取加入图片
(图片组,
编辑框1.内容,
,
)
图片框1.图片
＝
取图片组图片
(图片组,
图标索引,
)
.如果真结束
.子程序
_按钮3_被单击
提取资源文件图标
(编辑框1.内容,
0,
编辑框2.内容,
)
.如果真
(编辑框2.内容
＝
“”)
信息框
(“您还没有选择您要保存的目录”,
#错误图标,
“警告”)
.如果真结束
.如果真
(编辑框2.内容
≠
“”)
信息框
(“
图标已保存到：”
＋
#换行符
＋
编辑框2.内容
＋
#换行符，#信息图标,
“提示”)
.如果真结束
.子程序
__启动窗口_创建完毕
xp风格
(3)