易语言制作一个可以免费试用10分钟的软件
发布网友
发布时间:2022-04-30 17:40
我来回答
共1个回答
热心网友
时间:2022-06-28 14:09
.版本 2
.支持库 iext6
.支持库 spec
.子程序 __启动窗口_创建完毕
.局部变量 注册码, 整数型
注册码 = 0
.如果真 (注册码 = 0)
时钟1.时钟周期 = 1000
多功能条1.最大位置 = 5
.如果真结束
.子程序 _时钟1_周期事件
多功能条1.位置 = 多功能条1.位置 + 1
.子程序 _多功能条1_位置被改变
.如果真 (多功能条1.位置 = 多功能条1.最大位置)
信息框 (“抱歉,您的十分钟试用时间已经结束,请注册!”, 0, )
_启动窗口.销毁 ()
调试输出 (“下面可以写上链接数据,判断是否二次启动”)
.如果真结束