按钮置随机数字（禁止）

li10001

点按钮后编辑框会随机出现一个数字，然后按钮就禁止再点击了，就算重开程序也是禁止的
总之就只能点一下，之后就不能再点了！

这种可以实现不？不行的话随便搞几个吧

半夏时光

[e]
.版本 2

.子程序 __启动窗口_创建完毕

.如果真 (文件是否存在 (取运行目录 () ＋ “\1.ini”))
    .如果真 (读配置项 (“C:\1.ini”, “X”, “X1”, ) ＝ 到文本 (取硬盘特征字 () ＋ 1))
        按钮1.禁止 ＝ 真
    .如果真结束

.如果真结束


.子程序 __启动窗口_首次激活

写配置项 (取运行目录 () ＋ “\1.ini”, “X”, “X1”, 到文本 (取硬盘特征字 ()))

.子程序 __启动窗口_将被销毁

写配置项 (取运行目录 () ＋ “\1.ini”, “X”, “X1”, 到文本 (取硬盘特征字 () ＋ 1))


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

置随机数种子 ()
编辑框1.内容 ＝ 到文本 (取随机数 (0, 100))
[/e]

空之影

试一试这jia吧！

532098613

给你写好了 有效请评分！~

我是秘密.rar (1.04 KB, 下载次数: 9)

2014-5-2 19:56 上传

点击文件名下载附件

li10001

532098613 发表于 2014-5-2 19:57
给你写好了 有效请评分！~

为什么，一运行就不能点按钮

半夏时光

[e]
.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

.如果真 (文件是否存在 (取运行目录 () ＋ “\1.ini”))
    .如果真 (读配置项 (“C:\1.ini”, “X”, “X1”, ) ＝ 到文本 (取硬盘特征字 () ＋ 1))
        按钮1.禁止 ＝ 真
    .如果真结束

.如果真结束



.子程序 __启动窗口_首次激活

写配置项 (取运行目录 () ＋ “\1.ini”, “X”, “X1”, 到文本 (取硬盘特征字 ()))

.子程序 __启动窗口_将被销毁

写配置项 (取运行目录 () ＋ “\1.ini”, “X”, “X1”, 到文本 (取硬盘特征字 () ＋ 1))


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

置随机数种子 ()
编辑框1.内容 ＝ 到文本 (取随机数 (0, 100))
[/e]

半夏时光

楼主试试看，可选最佳。。。。

532098613

li10001 发表于 2014-5-2 20:08
为什么，一运行就不能点按钮

要和那个配置文件放在一起啊 没有配置当然不能点了啊 你打开源码也知道要配置文件的。

落歌

有效求采纳，

半夏时光

无效，请采纳。。。