马上注册，结交更多易友，享用更多功能，让你轻松玩转觅风论坛。
您需要 登录 才可以下载或查看，没有账号？立即注册
x
本帖最后由 tiger2758 于 2019-11-10 00:43 编辑
.版本 2
.支持库 edroptarget
.支持库 eAPI
.支持库 shell
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())
编辑框2.内容 ＝ “ ” ＋ 取运行目录 ()
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
编辑框1.内容 ＝ “ ” ＋ 接收到的文件路径
.子程序 _按钮1_被单击
.局部变量 n, 整数型
.计次循环首 (100, n)
提取资源文件图标 (删首空 (编辑框1.内容), 0, 删首空 (编辑框2.内容) ＋ “\” ＋ 编辑框3.内容 ＋ 到文本 (n) ＋ “.ico”, n)
.计次循环尾 ()
.如果 (文件是否存在 (删首空 (编辑框2.内容) ＋ “\” ＋ 编辑框3.内容 ＋ “1.ico”) ＝ 真)
信息框 (“操作完成！”, 321, )
.否则
信息框 (“未提取到图标！”, 321, )
.如果结束
.子程序 _编辑框1_内容被改变
按钮1.禁止 ＝ 假
.子程序 _按钮3_被单击
编辑框2.内容 ＝ “ ” ＋ 浏览文件夹 (“浏览”, )
.子程序 _按钮2_被单击
.局部变量 n, 整数型
.计次循环首 (100, n)
删除文件 (删首空 (编辑框2.内容) ＋ “\” ＋ 编辑框3.内容 ＋ 到文本 (n) ＋ “.ico”)
.计次循环尾 ()
.子程序 _按钮4_被单击
执行 (4, 删首空 (编辑框2.内容), , , )
|
