易语言_编辑框加入进度

 

.版本 2
.支持库 EThread

.程序集 窗口程序集_启动窗口
.程序集变量 句柄

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

关闭线程句柄 (句柄)
编辑框1.内容 = “”
启动线程 (&读取进度, , 句柄)

.子程序 读取进度
.局部变量 x, 整数型


编辑框1.加入文本 (“正在载入”)
延时 (500)
.计次循环首 (10, x)
    编辑框1.加入文本 (“.”)
    延时 (500)  ' 自己设置延时  1000为一秒
.计次循环尾 ()
编辑框1.加入文本 (#换行符)
编辑框1.加入文本 (“载入成功”)

赞 (0)