软件运行半小时就闪退

凹凸◆小怪兽

软件运行半小时就闪退.试了很多方法,实在找不到错误的地方,每次都是在调试输出(文本型)哪里闪退.(* “1”* “2”
* “18952”)   '调试信息

请问有大神能帮忙改一下吗?看看到底什么地方的问题
模块什么的都打包好了,大神下载就可以看.

w409608911

应该已经解决了，闪退原因应该是超级表格插入相太多导致的

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
程序集_文本型	文本型
程序集_i	整数型
传参数组	文本型	0
程序集_字节集长度	整数型

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

全_pid ＝ 10684
启动线程 (&监视信息, , )
全_许可证 ＝ 创建进入许可证 ()

子程序名	返回值类型	公开	备 注
监视信息

变量名	类 型	静态	数组	备 注
文本型	文本型
传参串	字节集
分隔符	字节集
字节集	类_内存
指针	整数型
整数型	整数型

' 文本型 ＝ 传递消息 ()
整数型 ＝ 读内存整数型 (全_pid, 4560128, )
整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 140, )
整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 30, )
整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 8, )
整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 26, )
整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 4, )
调试输出 (“1”)
' 文本型 ＝ 转换Unicode转Ansi (字节集.读字节集 (全_pid, 整数型, ))
文本型 ＝ 到文本 (程序集_i ＋ 5)
' 字节集_字节集转文本 (编码_Ansi到Unicode())
调试输出 (“2”)
调试输出 (文本型)
' 文本型 ＝ 到文本 (程序集_i ＋ 5)
调试输出 (3)
如果真 (文本型 ≠ 程序集_文本型)
程序集_i ＝ 程序集_i ＋ 1
分隔符 ＝ { 255 }
传参串 ＝ 到字节集 (到文本 (程序集_i)) ＋ 分隔符 ＋ 到字节集 (文本型)
指针 ＝ 申请内存 (取字节集长度 (传参串), 真)
调试输出 (4)
程序集_字节集长度 ＝ 取字节集长度 (传参串)
写到内存 (传参串, 指针, )
调试输出 (5)
' 调试输出 (“写到内存”, 指针)
启动线程 (&监视, 指针, )
程序集_文本型 ＝ 文本型
程序_延时 (50, )
监视信息 ()

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

变量名	类 型	静态	数组	备 注
计时	整数型
分钟1	整数型
小时1	整数型

编辑框4.内容 ＝ 标签5.标题
标签3.标题 ＝ 标签5.标题
标签5.标题 ＝ 到文本 (到数值 (标签3.标题) ＋ 1)
_启动窗口.标题 ＝ “软件已运行” ＋ 标签15.标题 ＋ “天” ＋ 标签12.标题 ＋ “小时” ＋ 标签10.标题 ＋ “分” ＋ 标签5.标题 ＋ “秒”
如果真 (标签5.标题 ＝ “60”)
编辑框4.内容 ＝ “”
标签3.标题 ＝ “”
标签5.标题 ＝ “0”
分钟1 ()
写到文件 (取特定目录 ( #系统桌面 ) ＋ “\运行时间.txt”, 到字节集 (“软件已运行” ＋ 标签15.标题 ＋ “天” ＋ 标签12.标题 ＋ “小时” ＋ 标签10.标题 ＋ “分” ＋ 标签5.标题 ＋ “秒” ＋ #换行符 ＋ “软件读取了” ＋ 到文本 (超级列表框1.取表项数 ()) ＋ “项”))

子程序名	返回值类型	公开	备 注
分钟1

编辑框5.内容 ＝ 标签10.标题
标签11.标题 ＝ 标签10.标题
标签10.标题 ＝ 到文本 (到数值 (标签11.标题) ＋ 1)
如果真 (标签10.标题 ＝ “60”)
编辑框5.内容 ＝ “”
标签11.标题 ＝ “”
标签10.标题 ＝ “0”
小时1 ()
' 本源码来自易语言资源网(www.5A5X.com)

子程序名	返回值类型	公开	备 注
小时1

编辑框6.内容 ＝ 标签12.标题
标签13.标题 ＝ 标签12.标题
标签12.标题 ＝ 到文本 (到数值 (标签13.标题) ＋ 1)
如果真 (标签12.标题 ＝ “24”)
编辑框6.内容 ＝ “”
标签13.标题 ＝ “”
标签12.标题 ＝ “0”
天数1 ()
' 本源码来自易语言资源网(www.5A5X.com)

子程序名	返回值类型	公开	备 注
天数1

编辑框7.内容 ＝ 标签15.标题
标签16.标题 ＝ 标签15.标题
标签15.标题 ＝ 到文本 (到数值 (标签16.标题) ＋ 1)
' 本源码来自易语言资源网(www.5A5X.com)

子程序名	返回值类型	公开	备 注
监视
参数名	类 型	参考	可空	数组	备 注
传参	整数型

变量名	类 型	静态	数组	备 注
参数数组	字节集		0
序列号	整数型
文本内容	文本型
参数串	字节集

全_计数器 ＝ 全_计数器 ＋ 1
进入许可区 (全_许可证)
参数串 ＝ 指针到字节集 (传参, 程序集_字节集长度)
参数数组 ＝ 分割字节集 (参数串, { 255 }, )
序列号 ＝ 到整数 (到文本 (参数数组 [1]))
文本内容 ＝ 到文本 (参数数组 [2])
调试输出 (6)
超级列表框1.插入表项 (, 到文本 (序列号), , , , )
超级列表框1.置标题 (序列号 － 序列号 ＋ 全_计数器 － 1, 1, 时间到文本 (取现行时间 (), #全部转换 ))
超级列表框1.置标题 (序列号 － 序列号 ＋ 全_计数器 － 1, 2, 删全部空 (文本内容))
超级列表框1.保证显示 (序列号 － 1)
释放内存 (传参)
调试输出 (7)
' 调试输出 (“释放内存”, 传参)
退出许可区 (全_许可证)
如果真 (全_计数器 ＝ 100)
超级列表框1.全部删除 ()
全_计数器 ＝ 0
处理事件 ()
处理事件 ()

全局变量名	类 型	数组	公开	备 注
全_pid	整数型
全_许可证	整数型
全_计数器	整数型

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库
shell	操作系统界面功能支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> .支持库 shell<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 程序集_文本型, 文本型<br /> .程序集变量 程序集_i, 整数型<br /> .程序集变量 传参数组, 文本型, , "0"<br /> .程序集变量 程序集_字节集长度, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 全_pid ＝ 10684<br /> 启动线程 (&监视信息, , )<br /> 全_许可证 ＝ 创建进入许可证 ()<br /> <br /> .子程序 监视信息<br /> .局部变量 文本型, 文本型<br /> .局部变量 传参串, 字节集<br /> .局部变量 分隔符, 字节集<br /> .局部变量 字节集, 类_内存<br /> .局部变量 指针, 整数型<br /> .局部变量 整数型, 整数型<br /> <br /> ' 文本型 ＝ 传递消息 ()<br /> 整数型 ＝ 读内存整数型 (全_pid, 4560128, )<br /> 整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 140, )<br /> 整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 30, )<br /> 整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 8, )<br /> 整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 26, )<br /> 整数型 ＝ 读内存整数型 (全_pid, 整数型 ＋ 4, )<br /> 调试输出 (“1”)<br /> ' 文本型 ＝ 转换Unicode转Ansi (字节集.读字节集 (全_pid, 整数型, ))<br /> 文本型 ＝ 到文本 (程序集_i ＋ 5)<br /> ' 字节集_字节集转文本 (编码_Ansi到Unicode())<br /> 调试输出 (“2”)<br /> 调试输出 (文本型)<br /> <br /> ' 文本型 ＝ 到文本 (程序集_i ＋ 5)<br /> 调试输出 (3)<br /> .如果真 (文本型 ≠ 程序集_文本型)<br />     程序集_i ＝ 程序集_i ＋ 1<br />     分隔符 ＝ { 255 }<br />     传参串 ＝ 到字节集 (到文本 (程序集_i)) ＋ 分隔符 ＋ 到字节集 (文本型)<br />     指针 ＝ 申请内存 (取字节集长度 (传参串), 真)<br />     调试输出 (4)<br />     程序集_字节集长度 ＝ 取字节集长度 (传参串)<br />     写到内存 (传参串, 指针, )<br />     调试输出 (5)<br />     ' 调试输出 (“写到内存”, 指针)<br />     启动线程 (&监视, 指针, )<br />     程序集_文本型 ＝ 文本型<br /> .如果真结束<br /> 程序_延时 (50, )<br /> 监视信息 ()<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 计时, 整数型<br /> .局部变量 分钟1, 整数型<br /> .局部变量 小时1, 整数型<br /> <br /> 编辑框4.内容 ＝ 标签5.标题<br /> 标签3.标题 ＝ 标签5.标题<br /> 标签5.标题 ＝ 到文本 (到数值 (标签3.标题) ＋ 1)<br /> _启动窗口.标题 ＝ “软件已运行” ＋ 标签15.标题 ＋ “天” ＋ 标签12.标题 ＋ “小时” ＋ 标签10.标题 ＋ “分” ＋ 标签5.标题 ＋ “秒”<br /> .如果真 (标签5.标题 ＝ “60”)<br />     编辑框4.内容 ＝ “”<br />     标签3.标题 ＝ “”<br />     标签5.标题 ＝ “0”<br />     分钟1 ()<br /> .如果真结束<br /> 写到文件 (取特定目录 (#系统桌面) ＋ “\运行时间.txt”, 到字节集 (“软件已运行” ＋ 标签15.标题 ＋ “天” ＋ 标签12.标题 ＋ “小时” ＋ 标签10.标题 ＋ “分” ＋ 标签5.标题 ＋ “秒” ＋ #换行符 ＋ “软件读取了” ＋ 到文本 (超级列表框1.取表项数 ()) ＋ “项”))<br /> <br /> .子程序 分钟1<br /> <br /> 编辑框5.内容 ＝ 标签10.标题<br /> 标签11.标题 ＝ 标签10.标题<br /> 标签10.标题 ＝ 到文本 (到数值 (标签11.标题) ＋ 1)<br /> .如果真 (标签10.标题 ＝ “60”)<br />     编辑框5.内容 ＝ “”<br />     标签11.标题 ＝ “”<br />     标签10.标题 ＝ “0”<br />     小时1 ()<br /> .如果真结束<br /> ' 本源码来自易语言资源网(www.5A5X.com)<br /> <br /> .子程序 小时1<br /> <br /> 编辑框6.内容 ＝ 标签12.标题<br /> 标签13.标题 ＝ 标签12.标题<br /> 标签12.标题 ＝ 到文本 (到数值 (标签13.标题) ＋ 1)<br /> .如果真 (标签12.标题 ＝ “24”)<br />     编辑框6.内容 ＝ “”<br />     标签13.标题 ＝ “”<br />     标签12.标题 ＝ “0”<br />     天数1 ()<br /> .如果真结束<br /> ' 本源码来自易语言资源网(www.5A5X.com)<br /> <br /> .子程序 天数1<br /> <br /> 编辑框7.内容 ＝ 标签15.标题<br /> 标签16.标题 ＝ 标签15.标题<br /> 标签15.标题 ＝ 到文本 (到数值 (标签16.标题) ＋ 1)<br /> ' 本源码来自易语言资源网(www.5A5X.com)<br /> <br /> .子程序 监视<br /> .参数 传参, 整数型<br /> .局部变量 参数数组, 字节集, , "0"<br /> .局部变量 序列号, 整数型<br /> .局部变量 文本内容, 文本型<br /> .局部变量 参数串, 字节集<br /> <br /> 全_计数器 ＝ 全_计数器 ＋ 1<br /> 进入许可区 (全_许可证)<br /> 参数串 ＝ 指针到字节集 (传参, 程序集_字节集长度)<br /> 参数数组 ＝ 分割字节集 (参数串, { 255 }, )<br /> 序列号 ＝ 到整数 (到文本 (参数数组 [1]))<br /> 文本内容 ＝ 到文本 (参数数组 [2])<br /> 调试输出 (6)<br /> 超级列表框1.插入表项 (, 到文本 (序列号), , , , )<br /> 超级列表框1.置标题 (序列号 － 序列号 ＋ 全_计数器 － 1, 1, 时间到文本 (取现行时间 (), #全部转换))<br /> 超级列表框1.置标题 (序列号 － 序列号 ＋ 全_计数器 － 1, 2, 删全部空 (文本内容))<br /> 超级列表框1.保证显示 (序列号 － 1)<br /> 释放内存 (传参)<br /> 调试输出 (7)<br /> ' 调试输出 (“释放内存”, 传参)<br /> 退出许可区 (全_许可证)<br /> .如果真 (全_计数器 ＝ 100)<br />     超级列表框1.全部删除 ()<br />     全_计数器 ＝ 0<br />     处理事件 ()<br /> .如果真结束<br /> 处理事件 ()<br /> .版本 2<br /> <br /> .全局变量 全_pid, 整数型<br /> .全局变量 全_许可证, 整数型<br /> .全局变量 全_计数器, 整数型

补充内容 (2025-6-2 20:27):
将这一行代码《超级列表框1.保证显示 (序列号  － 1)》替换成《超级列表框1.保证显示 (序列号 － 序列号 ＋ 全_计数器 － 1)》


补充内容 (2025-6-2 20:29):
.版本 2
.支持库 EThread
.支持库 iext
.支持库 spec

.子程序 监视
.参数 传参, 整数型
.局部变量 参数数组, 字节集, , "0"
.局部变量 序列号, 整数型
.局部变量 文本内容, 文本型
.局部变量 参数串, 字节集

全_计数器 ＝ 全_计数器 ＋ 1
进入许可区 (全_许可证)
参数串 ＝ 指针到字节集 (传参, 程序集_字节集长度)
参数数组 ＝ 分割字节集 (参数串, { 255 }, )
序列号 ＝ 到整数 (到文本 (参数数组 [1]))
文本内容 ＝ 到文本 (参数数组 [2])
' 调试输出 (6)
超级列表框1.插入表项 (, 到文本 (序列号), , , , )
超级列表框1.置标题 (全_计数器 － 1, 1, 时间到文本 (取现行时间 (), #全部转换))
超级列表框1.置标题 (全_计数器 － 1, 2, 删全部空 (文本内容))
超级列表框1.保证显示 (全_计数器 － 1)
释放内存 (传参)
' 调试输出 (7)
' 调试输出 (“释放内存”, 传参)
退出许可区 (全_许可证)
.如果真 (全_计数器 ＝ 100)
    超级列表框1.全部删除 ()
    全_计数器 ＝ 0
    处理事件 ()
.如果真结束
处理事件 ()

凌哥

递归需要改掉，线程传参的部分不安全。目前就看到这两个地方。你自己改改就行

凹凸◆小怪兽

凌哥 发表于 2025-5-30 12:15
递归需要改掉，线程传参的部分不安全。目前就看到这两个地方。你自己改改就行 ...

老哥,我真看不出来怎么改了.可以费您宝贵的一点时间帮我改改吗?能想的我都想出来了,真不知道怎么去改

凌哥

凹凸◆小怪兽 发表于 2025-5-30 12:16
老哥,我真看不出来怎么改了.可以费您宝贵的一点时间帮我改改吗?能想的我都想出来了,真不知道怎么去改 ...

不愿意花时间研究的话就付费吧加我Q

凹凸◆小怪兽

凌哥 发表于 2025-5-30 12:17
不愿意花时间研究的话就付费吧加我Q

呵呵,要是商业的我就说了.花点钱就花了.自己整着玩出问题了就求助一下.这花钱那花钱,你那么缺钱去上班啊

白十二

很多很明显的错误

凹凸◆小怪兽

凹凸◆小怪兽 发表于 2025-5-30 12:34
呵呵,要是商业的我就说了.花点钱就花了.自己整着玩出问题了就求助一下.这花钱那花钱,你那么缺钱去上班啊 ...

什么叫理直气壮?第一我没有在软件定制区发,第二我精币以前也是花钱冲的,我也付了精币了.这个付费那个付费那我不如Q群问了,不启动线程也可以正常,我就是想研究研究为什么线程启动就闪退.上来就付费?我说说还不让我说了?帮我的人我感激,不帮我的人我也不诋毁.这付费,那付费.又不是商业的我付什么费?缺钱就让家里的女人出去上夜班赚钱去

凹凸◆小怪兽

白十二 发表于 2025-5-30 14:46
很多很明显的错误

你好请问什么错误啊.我是按照烧饼老师的多线程视频写的多线程.实在找不出哪里的问题了