初识易语言
- 积分
- 8
威望0
易币3
贡献0
积分8
UID4132
在线时间2 小时
注册时间2020-4-18
|
1易币
.版本 2
.支持库 edroptarget
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 n, 整数型
.程序集变量 c, 整数型
.子程序 __启动窗口_创建完毕
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())
' c = 到数值 (编辑框2.内容)
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
编辑框1.内容 = 接收到的文件路径
.子程序 _按钮1_被单击
' 提取资源文件图标 (编辑框1.内容, 0, 取运行目录 () + “1.ico”, )
.计次循环首 (c, n)
提取资源文件图标 (编辑框1.内容, 0, 取运行目录 () + “\” + 到文本 (n) + “.ico”, n)
.计次循环尾 ()
.子程序 _编辑框1_内容被改变
按钮1.禁止 = 假
.子程序 _按钮2_被单击
.计次循环首 (c, n)
删除文件 (取运行目录 () + “\” + 到文本 (n) + “.ico”)
.计次循环尾 ()
程序可以编译,但是在编辑框2输入整数 程序点了没有任何反应,求助学长们给小弟解惑,纯小白~
|
|