新人求邀请码，觅风第十六课ICO提取工具代码

邀请码请发我QQ邮箱：729036325@qq.com
感谢觅风~~~

.程序集 窗口程序集_启动窗口
.程序集变量 n, 整数型

.子程序 __启动窗口_创建完毕

拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())


.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型

编辑框2.内容 ＝ 接收到的文件路径


.子程序 _按钮1_被单击

' 提取资源文件图标 (编辑框2.内容, 0, 取运行目录 () ＋ “\1.ico”, )
.计次循环首 (100, n)
    提取资源文件图标 (编辑框2.内容, 0, 取运行目录 () ＋ “\” ＋ 到文本 (n) ＋ “.ico”, n)
.计次循环尾 ()


.子程序 _按钮2_被单击

.计次循环首 (100, n)
    删除文件 (取运行目录 () ＋ “\” ＋ 到文本 (n) ＋ “.ico”)
.计次循环尾 ()