马上注册,结交更多易友,享用更多功能,让你轻松玩转觅风论坛。
您需要 登录 才可以下载或查看,没有账号?立即注册
x
.版本 2
.支持库 eAPI
.支持库 xplib
.支持库 edroptarget
.程序集 窗口程序集1
.程序集变量 n, 整数型
.子程序 _按钮1_被单击
.计次循环首 (100, n)
提取资源文件图标 (编辑框1.内容, 0, 取运行目录 () + “\” + 到文本 (n) + “.ico”, n)
.计次循环尾 ()
.子程序 __启动窗口_创建完毕
XP风格 (1)
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
编辑框1.内容 = 接收到的文件路径
.子程序 _按钮2_被单击
.局部变量 a, 整数型
.计次循环首 (100, a)
删除文件 (取运行目录 () + “\” + 到文本 (a) + “.ico”)
.计次循环尾 ()
|