易语言 怎么让按钮只可以按一次或者让程序在这台电脑上只能运行一次
.版本 2
.支持库 shell
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 wjh
.局部变量 cs
' 可以在多个地方写入运行次数,并且互相比较检验,比如写注册表和程序未部追加信息等方法同时进行
.如果 (文件是否存在 (取特定目录 (10) + “text.exe”) = 假)
复制文件 (取特定目录 (10) + “notepad.exe”, 取特定目录 (10) + “text.exe”)
.否则
.如果结束
wjh = 打开文件 (取特定目录 (10) + “text.exe”, , )
移动读写位置 (wjh, 1, 取文件长度 (wjh) - 1)
cs = 到数值 (到文本 (读入字节集 (wjh, 1)))
.如果 (cs = 9)
信息框 (“试用次数已到期,请注册!”, #警告图标, “注册信息:”)
结束 ()
.否则
移到文件尾 (wjh)
标题 = “次数限制例程-已运行次数:” + 到文本 (cs) + “ 剩余次数:” + 到文本 (9 - cs)
插入字节集 (wjh, 到字节集 (到文本 (cs + 1)))
关闭文件 (wjh)
可自行设置使用次数,我只提供思路,你自己看看研究一下吧!