软件崩溃 和线程相关 帮我看看是什么原因 怎么处理！

a8371

  

子程序名	返回值类型	公开	备 注
_按钮_取消_被单击

分组框_修改时长.可视 ＝ 假

子程序名	返回值类型	公开	备 注
生成卡密

变量名	类 型	静态	数组	备 注
卡密	文本型
局_索引	整数型
错误信息	文本型
生成数量	整数型
已有数量	整数型
总数量	整数型
i	整数型
开始时间	整数型

开始时间 ＝ 取启动时间 ()
判断 (编辑框_生成规则.内容 ≠ “” 且 编辑框_卡密时长.内容 ≠ “” 且 编辑框_生成数量.内容 ≠ “”)
生成数量 ＝ 到整数 (编辑框_生成数量.内容)
已有数量 ＝ 超级列表框_未使用卡密.取表项数 ()
总数量 ＝ 生成数量 ＋ 已有数量
超级列表框_未使用卡密.可视 ＝ 假
超级列表框_未使用卡密.禁止重画 ()
超级列表框_未使用卡密.发送信息 (4143, 总数量, 0)
计次循环首 (生成数量, i)
卡密 ＝ 到大写 (生成卡密规则 (编辑框_生成规则.内容))
进入许可区 (数据库许可证)
增加记录 (MySql句柄, “`未使用卡密`”, “`卡密`='” ＋ 卡密 ＋ “',`时长`='” ＋ 编辑框_卡密时长.内容 ＋ “',`类型`='” ＋ 组合框_卡密类型.内容 ＋ “',`制卡时间`='” ＋ 到文本 (取现行时间 ()) ＋ “'”)
退出许可区 (数据库许可证)
局_索引 ＝ 超级列表框_未使用卡密.插入表项 (, , , , , )
超级列表框_未使用卡密.置标题 (局_索引, 0, 到文本 (已有数量 ＋ i))
超级列表框_未使用卡密.置标题 (局_索引, 1, 卡密)
超级列表框_未使用卡密.置标题 (局_索引, 2, 编辑框_卡密时长.内容)
超级列表框_未使用卡密.置标题 (局_索引, 3, 组合框_卡密类型.内容)
超级列表框_未使用卡密.置标题 (局_索引, 4, 到文本 (取现行时间 ()))
计次循环尾 ()
超级列表框_未使用卡密.可视 ＝ 真
超级列表框_未使用卡密.允许重画 ()
超级列表框_未使用卡密.刷新显示 ()
超级列表框_未使用卡密.保证显示 (总数量 － 1)
状态条.置文本 (0, “生成信息不全!”)
调试输出 (取启动时间 () － 开始时间)

i支持库列表	支持库注释
iext	扩展界面支持库一
EThread	多线程支持库
mysql	MySql支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 EThread<br /> .支持库 mysql<br /> .支持库 spec<br /> <br /> .子程序 _按钮_取消_被单击<br /> <br /> 分组框_修改时长.可视 ＝ 假<br /> <br /> .子程序 生成卡密<br /> .局部变量 卡密, 文本型<br /> .局部变量 局_索引, 整数型<br /> .局部变量 错误信息, 文本型<br /> .局部变量 生成数量, 整数型<br /> .局部变量 已有数量, 整数型<br /> .局部变量 总数量, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 开始时间, 整数型<br /> <br /> 开始时间 ＝ 取启动时间 ()<br /> .判断开始 (编辑框_生成规则.内容 ≠ “” 且 编辑框_卡密时长.内容 ≠ “” 且 编辑框_生成数量.内容 ≠ “”)<br />     生成数量 ＝ 到整数 (编辑框_生成数量.内容)<br />     已有数量 ＝ 超级列表框_未使用卡密.取表项数 ()<br />     总数量 ＝ 生成数量 ＋ 已有数量<br />     超级列表框_未使用卡密.可视 ＝ 假<br />     超级列表框_未使用卡密.禁止重画 ()<br />     超级列表框_未使用卡密.发送信息 (4143, 总数量, 0)<br />     .计次循环首 (生成数量, i)<br />         卡密 ＝ 到大写 (生成卡密规则 (编辑框_生成规则.内容))<br />         进入许可区 (数据库许可证)<br />         增加记录 (MySql句柄, “`未使用卡密`”, “`卡密`='” ＋ 卡密 ＋ “',`时长`='” ＋ 编辑框_卡密时长.内容 ＋ “',`类型`='” ＋ 组合框_卡密类型.内容 ＋ “',`制卡时间`='” ＋ 到文本 (取现行时间 ()) ＋ “'”)<br />         退出许可区 (数据库许可证)<br />         局_索引 ＝ 超级列表框_未使用卡密.插入表项 (, , , , , )<br />         超级列表框_未使用卡密.置标题 (局_索引, 0, 到文本 (已有数量 ＋ i))<br />         超级列表框_未使用卡密.置标题 (局_索引, 1, 卡密)<br />         超级列表框_未使用卡密.置标题 (局_索引, 2, 编辑框_卡密时长.内容)<br />         超级列表框_未使用卡密.置标题 (局_索引, 3, 组合框_卡密类型.内容)<br />         超级列表框_未使用卡密.置标题 (局_索引, 4, 到文本 (取现行时间 ()))<br />     .计次循环尾 ()<br />     超级列表框_未使用卡密.可视 ＝ 真<br />     超级列表框_未使用卡密.允许重画 ()<br />     超级列表框_未使用卡密.刷新显示 ()<br />     超级列表框_未使用卡密.保证显示 (总数量 － 1)<br /> .默认<br />     状态条.置文本 (0, “生成信息不全!”)<br /> .判断结束<br /> 调试输出 (取启动时间 () － 开始时间)

a8371

补充一下  如果在代码里面加 处理事件()  或者启动线程（&生成卡密）  是会崩溃的     单独生成卡密（）是不会不会崩溃的

frankiy

建议1：把许可证控制取消；如果你的环境不会对数据库频繁访问读写，那就没有增加许可证的必要。

建议2：把所有需要用到的比如  编辑框_生成规则.内容  、编辑框_卡密时长.内容  读出来，做成一个局部变量来使用，避免线程中频繁访问控件内容。

建议3：超级列表框_未使用卡密.可视 = 真 /假  这两段删除


再测试试试