易语言程序限制运行次数

发布网友发布时间：2022-05-06 04:09

我来回答

共5个回答

热心网友时间：2022-06-28 16:48

先插入一程序集，写代码判断是否已有程序在运行。（这样的好处是程序启动后不先载入窗口，先进行判断。如果程序已经在运行就返回。如果在启动窗口载入后再进行判断，就会出现窗口闪一下再返回的结果。）看下面的代码：

.版本 2

.支持库 spec

.程序集程序集1

.子程序 _启动子程序, 整数型

.局部变量局部_文件, 文本型

.局部变量局部_文件号, 整数型

局部_文件＝取运行目录 () ＋ “\Ban.sys”

局部_文件号＝打开文件 (局部_文件, 5, 4)

调试输出 (局部_文件号)

.如果真 (局部_文件号＝ 0)

信息框 (“程序已经运行！请不要重复打开！”, 16, )

返回 (0)

.如果真结束

载入 (窗口_主窗口, , 假)

返回 (0)

这是在易语言论坛看到的源码，发上来希望能帮到你。

热心网友时间：2022-06-28 16:48

其实根本不用好复杂，不然楼主不好理解了，我的思路很简单，判断进程中的进程名是否存在自身进程，如果已经存在，那么信息框（“不能重复运行”）然后结束。假如楼主的程序的进程名叫 a.exe 那么源码如下：

很简单吧，如果楼主想要这个程序可以加我QQ 1245617757

热心网友时间：2022-06-28 16:48

用写注册表的方式：
.版本 2
.支持库 spec
.子程序 __启动窗口_创建完毕
.局部变量次数
次数＝到整数 (取文本注册项 (4, “检测程序次数”, ))
写注册项 (4, “检测程序次数”, 到文本 (次数＋ 1))
调试输出 (取文本注册项 (4, “检测程序次数”, ))
.如果真 (次数＋ 1 ≥ 2)
信息框 (“第二次以上了”, 0, )
结束 ()

热心网友时间：2022-06-28 16:49

是不是禁止程序二次运行

热心网友时间：2022-06-28 16:50

？？？