遇到难题了，希望求助各位大佬帮助！

cvhnjust

想写一个小程序，易语言程序正常启动不会被关闭，而是当识别到指定进程手动关闭之后。在30秒内易语言小程序直接结束自身并关闭。求助一下大佬，最好写一个例子，新手小白。



补充内容 (2024-11-23 22:45):
求求各路神仙大佬哈，我用的是精易模块，想求大佬写个简单点的例子。谢谢谢谢谢！

a45167039

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

启动线程 (&检测, , )

子程序名	返回值类型	公开	备 注
检测

判断循环首 (真)
如果真 (进程_是否存在 (“果果高原.exe”) ＝ 真)  ' 检测是否存在
判断循环首 (真)  ' 存在了开始循环判断是否关闭
如果真 (进程_是否存在 (“果果高原.exe”) ＝ 假)  ' 检测是否关闭
结束 ()
程序_延时 (1000)
判断循环尾 ()
程序_延时 (1000)
判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 启动线程 (&检测, , )<br /> <br /> <br /> .子程序 检测<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“果果高原.exe”) ＝ 真)  ' 检测是否存在<br />         .判断循环首 (真)  ' 存在了开始循环判断是否关闭<br />             .如果真 (进程_是否存在 (“果果高原.exe”) ＝ 假)  ' 检测是否关闭<br />                 结束 ()<br />             .如果真结束<br />             程序_延时 (1000)<br />         .判断循环尾 ()<br />     .如果真结束<br />     程序_延时 (1000)<br /> .判断循环尾 ()

补充内容 (2024-11-23 23:29):
写了多余的判断  把判断是否关闭的那个注释里的真改成  进程_是否存在("果果高原.exe")   然后把检测是否存在的那段删除了

LEOONL

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

时钟1 ＝ 30000

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

如果真 (进程_是否存在 (“1.exe”))
进程_结束 (进程_取自进程ID ())

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 时钟1 ＝ 30000<br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> .如果真 (进程_是否存在 (“1.exe”))<br />     进程_结束 (进程_取自进程ID ())<br /> .如果真结束

a45167039

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

启动线程 (&检测, , )

子程序名	返回值类型	公开	备 注
检测

判断循环首 (真)
如果真 (进程_是否存在 (“果果高原.exe”) ＝ 假)
结束 ()
程序_延时 (1000)
判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 启动线程 (&检测, , )<br /> <br /> .子程序 检测<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“果果高原.exe”) ＝ 假)<br />         结束 ()<br />     .如果真结束<br />     程序_延时 (1000)<br /> .判断循环尾 ()

cvhnjust

a45167039 发表于 2024-11-23 22:35
[e=0].版本 2
.支持库 EThread

大佬编译不出来啊，提示错误(10064): 发现死循环代码

cvhnjust

LEOONL 发表于 2024-11-23 22:24
[e=0].版本 2

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

大佬我试过了，好像不太行。启动窗口创建完毕下面，如果不添加变量名（时钟1）编译不出来，会提示缺少变量名，添加变量名可以编译出来，但是没效果。很奇怪！

LEOONL

cvhnjust 发表于 2024-11-23 22:44
大佬我试过了，好像不太行。启动窗口创建完毕下面，如果不添加变量名（时钟1）编译不出来，会提示缺少变 ...

时钟是一个组件，跟编辑框 按钮一样

LEOONL

cvhnjust 发表于 2024-11-23 22:44
大佬我试过了，好像不太行。启动窗口创建完毕下面，如果不添加变量名（时钟1）编译不出来，会提示缺少变 ...

系统设置-编译-编译时是否检查死循环代码 去掉勾

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

启动线程 (&监视, , )

子程序名	返回值类型	公开	备 注
检测

判断循环首 (真)
如果真 (进程_是否存在 (“1.exe”))
进程_结束 (进程_取自进程ID ())
延时 (30000)
判断循环尾 ()

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 启动线程 (&监视, , )<br /> <br /> .子程序 检测<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“1.exe”))<br />         进程_结束 (进程_取自进程ID ())<br />     .如果真结束<br />     延时 (30000)<br /> .判断循环尾 ()

a45167039

cvhnjust 发表于 2024-11-23 22:41
大佬编译不出来啊，提示错误(10064): 发现死循环代码

易语言 工具 系统配置  编译 编译时是否检查死循环代码 取消勾选

cvhnjust

LEOONL 发表于 2024-11-23 22:51
系统设置-编译-编译时是否检查死循环代码 去掉勾
[e=0].版本 2

大佬我试过了，不太行。编译的程序我正常打开不会关闭，然后我开启指定EXE进程后，我手动关闭后。易语言程序并不会自我关闭并结束。等了很久都没关闭。代码我都是直接复制您的！外加了一个子程序（监视）不然编译不了。