易语言简单的限制软件到期时间源码
易语言简单的限制软件到期时间源码思路是获取北京时间.然后判断软件到期没有...从而限制使用时间.
只是供来学习的.真正的软件测试卡.天卡并不是这样实现的哦.
源码截图
.版本 2
.支持库 script
.程序集 窗口程序集_启动窗口
.程序集变量 文本时间, 文本型
.程序集变量 增加的时间, 日期时间型
.子程序 __启动窗口_创建完毕
.子程序 _时钟1_周期事件
时钟1.时钟周期 = 1000
脚本组件1.执行 (#js)
标签1.标题 = “当前北京时间:” + 脚本组件1.运行 (“showtime”, )
.子程序 _按钮1_被单击
按钮1.禁止 = 真
_启动窗口.标题 = “程序正常使用中”
编辑框1.禁止 = 真
脚本组件1.执行 (#js)
文本时间 = 脚本组件1.运行 (“showtime”, )
增加的时间 = 增减时间 (到时间 (文本时间), 8, 到数值 (编辑框1.内容))
.子程序 _时钟2_周期事件
.局部变量 判断时间, 文本型
.局部变量 数字, 整数型
时钟2.时钟周期 = 1000
脚本组件1.执行 (#js)
判断时间 = 脚本组件1.运行 (“showtime”, )
数字 = 取时间间隔 (增加的时间, 到时间 (判断时间), 8)
.如果 (数字 ≤ 0)
时钟2.销毁 ()
按钮2.销毁 ()
_启动窗口.标题 = “程序使用到期了”
返回 ()
.否则
_启动窗口.标题 = “程序正常使用中”
.如果结束
.子程序 _按钮2_被单击
信息框 (“易语言学习吧www.eyy8.vip”, 0, , )
源码下载:
楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
这个帖子不回对不起自己!我想我是一天也不能离开易语言吧。
感谢楼主的无私分享!要想易语言吧好 就靠你我他
脚本组件1.执行 (#js)
菜鸟一个,才学习没多长时间,这条看不懂,请问大哥什么意思?
既然你诚信诚意的推荐了,那我就勉为其难的看看吧!易语言吧不走平凡路。
这东西我收了!谢谢楼主!易语言吧真好! 感谢楼主, 东西我收了!易语言吧真是好 111111111111111111111111111 楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了! 楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
页:
[1]
2