windows之家1.易语言让功能有时间的限制
.版本 2
.局部变量 时间， 日期时间型
.局部变量 年
.局部变量 月
.局部变量 日
.局部变量 时
.局部变量 分
.局部变量 秒
时间 = 到文本 （取现行时间 （））
年 = 取年份 （时间）
月 = 取月份 （时间）
日 = 取日 （时间）
时 = 取小时 （时间）
分 = 取分钟 （时间）
秒 = 取秒 （时间）
.如果真 （年 ≠ 2011 且 月 ≠ 3 且 日 ≠ 8）'判断日期是否在使用范围内，如果不在则结束本程序
信息框 （“试用期已过”， 0, ）
结束（）
.如果真结束
2.易语言写配置项设置使用时间
很简单
.版本 2
.支持库 spec
.子程序 _窗口1_创建完毕
时间判断 （）
.子程序 时间判断
.局部变量 软件时间， 整数型
.局部变量 现在时间， 整数型
.局部变量 月份整理， 文本型
.局部变量 日期整理， 文本型
软件时间 = 20110810
.如果 （取月份 （取现行时间 （）） 月份整理 = “0” + 到文本 （取月份 （取现行时间 （）））
.否则
月份整理 = 到文本 （取月份 （取现行时间 （）））
.如果结束
.如果 （取日 （取现行时间 （）） 日期整理 = “0” + 到文本 （取日 （取现行时间 （）））
.否则
日期整理 = 到文本 （取日 （取现行时间 （）））
.如果结束
现在时间 = 到数值 （到文本 （取年份 （取现行时间 （））） + 月份整理 + 日期整理）
调试输出 （现在时间）
.如果 （现在时间 窗口1.标题 = “软件 登陆 软件正常使用”
.否则
窗口1.标题 = “软件已过期，请您准时到官网下载更新”
标签5.标题 = “软件使用期限已到，请准时下载更新”
按钮1.禁止 = 真
载入 （窗口8， ， 真）
转载请注明出处windows之家 » 易语言win10设置时间