多线程问题请教大神，谢谢！

jcos

启动线程 (&一楼, , )
启动线程 (&二楼, , )
....
像这样的为什么启动后会弹出：

运行时出错！
错误信息：指定窗口或窗口组件不存在或尚未载入
1375797558，100729468
“”
“”


单独一条如：
启动线程 (&一楼, , )
就不会有问题。别的线程同理。

子线程中有全局数组变量，变量进到子线程中是不改变其值的，只是调用数组中的内容。
子线程中还有多条mysql，和循环。

请问大神这该如何办？

只会易语言

代码问题，你的子程序1对组件做了什么操作。导致子程序2里找不到。然后就报错了

补充内容 (2019-11-4 16:47):
可以加个许可证限制一下同时操作

jcos

加个
延时 (80)
居然可以了...
是不是说加了等于线程都处理完毕了再下一条线程？
这样的话，好像也没有意义了吧？

jcos

只会易语言 发表于 2019-11-4 16:47
代码问题，你的子程序1对组件做了什么操作。导致子程序2里找不到。然后就报错了

补充内 ...

每一条线程对应的都不是同一组件，有两条线程分别对应不同的柱状图控件，还有一条线程对应高级表格，都是独立组件，多线程之间没有重复操作同一组件。唯有重复的可能就是全局用的数据库连接用的一个子程序吧，至于全局数组，那不同线程对应的数组也不一样，不重复。

只会易语言

jcos 发表于 2019-11-4 16:54
每一条线程对应的都不是同一组件，有两条线程分别对应不同的柱状图控件，还有一条线程对应高级表格，都是 ...

那就不清楚了，猜不出来

列明

多綫程是在哪裏啓動的，
是在啓動窗口創建完畢事件下麽？
你放到按鈕事件下。

瀚海

建议你先把源码放上来看看

jcos

列明 发表于 2019-11-4 17:41
多綫程是在哪裏啓動的，
是在啓動窗口創建完畢事件下麽？
你放到按鈕事件下。

是在创建完毕后的

jcos

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_耗材报表

子程序名	返回值类型	公开	备 注
_耗材报表_创建完毕

如果真 (数据连接 ≤ 0)
数据连库 ()

启动线程 (&部门图柱, , )
延时 (80)
启动线程 (&耗材明细表, , )
延时 (15)
启动线程 (&耗材图柱, , )

子程序名	返回值类型	公开	备 注
部门图柱

变量名	类 型	静态	数组	备 注
次	整数型
循环次数	整数型
统计	整数型
月统计	整数型
当前月	文本型
上一月	文本型
上二月	文本型
N	整数型

N ＝ 取启动时间 ()
当前月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, 0))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, 0)))
上一月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -1))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -1)))
上二月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -2))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -2)))
柱图.X轴标注数量 ＝ 取数组成员数 (部门列表)
柱图.图例数量 ＝ 3
计次循环首 (柱图.X轴标注数量, 次)
执行SQL语句 (数据连接, “select * from it_haocai WHERE b4='” ＋ 部门列表 [次] ＋ “' and b2>='” ＋ 当前月 ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b7”, 统计)
月统计 ＝ 月统计 ＋ 统计
计次循环尾 ()
柱图.当前X轴标注索引 ＝ 次
柱图.当前图例文字 ＝ 当前月
柱图.当前图例颜色 ＝ 取颜色值 (取随机数 (, ), 取随机数 (, ), 取随机数 (, ))
柱图.当前X轴标注文字 ＝ 部门列表 [次]
柱图.当前图例索引 ＝ 0
柱图.当前数据值 ＝ 月统计
月统计 ＝ 0
循环次数 ＝ 0
执行SQL语句 (数据连接, “select * from it_haocai WHERE b4='” ＋ 部门列表 [次] ＋ “' and b2>='” ＋ 上一月 ＋ “-1' and b2<'” ＋ 当前月 ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b7”, 统计)
月统计 ＝ 月统计 ＋ 统计
计次循环尾 ()
柱图.当前图例索引 ＝ 1
柱图.当前图例文字 ＝ 上一月
柱图.当前数据值 ＝ 月统计
月统计 ＝ 0
循环次数 ＝ 0
执行SQL语句 (数据连接, “select * from it_haocai WHERE b4='” ＋ 部门列表 [次] ＋ “' and b2>='” ＋ 上二月 ＋ “-1' and b2<'” ＋ 上一月 ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b7”, 统计)
月统计 ＝ 月统计 ＋ 统计
计次循环尾 ()
柱图.当前图例索引 ＝ 2
柱图.当前图例文字 ＝ 上二月
柱图.当前数据值 ＝ 月统计
次 ＝ 次 ＋ 1
月统计 ＝ 0
循环次数 ＝ 0
计次循环尾 ()
柱图.Y轴单位 ＝ 到文本 ( (取启动时间 () － N) ÷ 1000) ＋ “S”
调试输出 (“结束”)

子程序名	返回值类型	公开	备 注
耗材图柱

变量名	类 型	静态	数组	备 注
次	整数型
循环次数	整数型
统计	整数型
月统计	整数型
当前月	文本型
上一月	文本型
上二月	文本型
N	整数型

N ＝ 取启动时间 ()
当前月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, 0))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, 0)))
上一月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -1))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -1)))
上二月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -2))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -2)))
耗材柱图.X轴标注数量 ＝ 取数组成员数 (耗材列表)
耗材柱图.图例数量 ＝ 3
计次循环首 (耗材柱图.X轴标注数量, 次)
执行SQL语句 (数据连接, “select * from it_haocai WHERE b5='” ＋ 耗材列表 [次] ＋ “' and b2>='” ＋ 当前月 ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b7”, 统计)
月统计 ＝ 月统计 ＋ 统计
计次循环尾 ()
耗材柱图.当前X轴标注索引 ＝ 次
耗材柱图.当前图例文字 ＝ 当前月
耗材柱图.当前图例颜色 ＝ 取颜色值 (取随机数 (, ), 取随机数 (, ), 取随机数 (, ))
耗材柱图.当前X轴标注文字 ＝ 耗材列表 [次]
耗材柱图.当前图例索引 ＝ 0
耗材柱图.当前数据值 ＝ 月统计
月统计 ＝ 0
循环次数 ＝ 0
执行SQL语句 (数据连接, “select * from it_haocai WHERE b5='” ＋ 耗材列表 [次] ＋ “' and b2>='” ＋ 上一月 ＋ “-1' and b2<'” ＋ 当前月 ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b7”, 统计)
月统计 ＝ 月统计 ＋ 统计
计次循环尾 ()
耗材柱图.当前图例索引 ＝ 1
耗材柱图.当前图例文字 ＝ 上一月
耗材柱图.当前数据值 ＝ 月统计
月统计 ＝ 0
循环次数 ＝ 0
执行SQL语句 (数据连接, “select * from it_haocai WHERE b5='” ＋ 耗材列表 [次] ＋ “' and b2>='” ＋ 上二月 ＋ “-1' and b2<'” ＋ 上一月 ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b7”, 统计)
月统计 ＝ 月统计 ＋ 统计
计次循环尾 ()
耗材柱图.当前图例索引 ＝ 2
耗材柱图.当前图例文字 ＝ 上二月
耗材柱图.当前数据值 ＝ 月统计
次 ＝ 次 ＋ 1
月统计 ＝ 0
循环次数 ＝ 0
计次循环尾 ()
耗材柱图.Y轴单位 ＝ 到文本 ( (取启动时间 () － N) ÷ 1000) ＋ “S”
调试输出 (“结束”)

子程序名	返回值类型	公开	备 注
耗材明细表

变量名	类 型	静态	数组	备 注
循环次数	整数型
取数据	文本型		8
索引	整数型

' N ＝ 取启动时间 ()
执行SQL语句 (数据连接, “select * from it_haocai WHERE b2>='” ＋ 到文本 (取年份 (取现行时间 ())) ＋ “-” ＋ 到文本 (取月份 (取现行时间 ())) ＋ “-1'”)
连接句柄 ＝ 取记录集 (数据连接)
明细表.行数 ＝ 取记录集行数 (连接句柄) ＋ 1
计次循环首 (取记录集行数 (连接句柄), 循环次数)
到指定行 (连接句柄, 循环次数 － 1)
读字段值 (连接句柄, “b2”, 取数据 [1])
读字段值 (连接句柄, “b3”, 取数据 [2])
读字段值 (连接句柄, “b4”, 取数据 [3])
读字段值 (连接句柄, “b5”, 取数据 [4])
读字段值 (连接句柄, “b6”, 取数据 [5])
读字段值 (连接句柄, “b7”, 取数据 [6])
读字段值 (连接句柄, “b8”, 取数据 [7])
读字段值 (连接句柄, “b9”, 取数据 [8])
索引 ＝ 索引 ＋ 1
明细表.置数据 (索引, 0, 1, 取数据 [1])
明细表.置数据 (索引, 1, 1, 取数据 [2])
明细表.置数据 (索引, 2, 1, 取数据 [3])
明细表.置数据 (索引, 3, 1, 取数据 [4])
明细表.置数据 (索引, 4, 1, 取数据 [5])
明细表.置数据 (索引, 5, 1, 取数据 [6])
明细表.置数据 (索引, 6, 1, 取数据 [7])
明细表.置数据 (索引, 7, 1, 取数据 [8])
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_耗材报表_可否被关闭	逻辑型

耗材报表.可视 ＝ 假
主窗口.维护按钮.选中 ＝ 假
返回 (假)

子程序名	返回值类型	公开	备 注
_重新加载_被选择

耗材报表.销毁 ()
处理事件 ()
载入 (耗材报表, , 假)
返回 ()

子程序名	返回值类型	公开	备 注
_耗材报表_鼠标右键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

弹出菜单 (菜单, , )

子程序名	返回值类型	公开	备 注
_耗材报表_尺寸被改变

如果真 (耗材报表.位置 ＝ 3)
柱图.宽度 ＝ 耗材报表.宽度 － 15
耗材柱图.宽度 ＝ 耗材报表.宽度 － 15
明细表.宽度 ＝ (耗材报表.宽度 － 15) ÷ 2
统计表.宽度 ＝ (耗材报表.宽度 － 15) ÷ 2 － 5
统计表.左边 ＝ (耗材报表.宽度 － 15) ÷ 2 ＋ 10
统计表.高度 ＝ 耗材报表.高度 － 360
明细表.高度 ＝ 耗材报表.高度 － 360
返回 ()
如果真 (耗材报表.位置 ＝ 0)
柱图.宽度 ＝ 985
耗材柱图.宽度 ＝ 985
明细表.宽度 ＝ 490
统计表.宽度 ＝ 490
统计表.高度 ＝ 335
明细表.高度 ＝ 335
统计表.左边 ＝ 500
耗材报表.左边 ＝ (取屏幕宽度 () － 1000) ÷ 2
耗材报表.顶边 ＝ (取屏幕高度 () － 700) ÷ 2
返回 ()

i支持库列表	支持库注释
EThread	多线程支持库
EChartBar	数据图表支持库
mysql	MySql支持库
spec	特殊功能支持库
eGrid	高级表格支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 EChartBar<br /> .支持库 mysql<br /> .支持库 spec<br /> .支持库 eGrid<br /> <br /> .程序集 窗口程序集_耗材报表<br /> <br /> .子程序 _耗材报表_创建完毕<br /> <br /> .如果真 (数据连接 ≤ 0)<br />     数据连库 ()<br /> .如果真结束<br /> <br /> 启动线程 (&部门图柱, , )<br /> <br /> 延时 (80)<br /> 启动线程 (&耗材明细表, , )<br /> <br /> 延时 (15)<br /> 启动线程 (&耗材图柱, , )<br /> <br /> .子程序 部门图柱<br /> .局部变量 次, 整数型<br /> .局部变量 循环次数, 整数型<br /> .局部变量 统计, 整数型<br /> .局部变量 月统计, 整数型<br /> .局部变量 当前月, 文本型<br /> .局部变量 上一月, 文本型<br /> .局部变量 上二月, 文本型<br /> .局部变量 N, 整数型<br /> <br /> N ＝ 取启动时间 ()<br /> 当前月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, 0))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, 0)))<br /> 上一月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -1))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -1)))<br /> 上二月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -2))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -2)))<br /> 柱图.X轴标注数量 ＝ 取数组成员数 (部门列表)<br /> 柱图.图例数量 ＝ 3<br /> <br /> .计次循环首 (柱图.X轴标注数量, 次)<br />     执行SQL语句 (数据连接, “select * from it_haocai WHERE b4='” ＋ 部门列表 [次] ＋ “' and b2>='” ＋ 当前月 ＋ “-1'”)<br />     连接句柄 ＝ 取记录集 (数据连接)<br />     .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />         到指定行 (连接句柄, 循环次数 － 1)<br />         读字段值 (连接句柄, “b7”, 统计)<br />         月统计 ＝ 月统计 ＋ 统计<br />     .计次循环尾 ()<br />     柱图.当前X轴标注索引 ＝ 次<br />     柱图.当前图例文字 ＝ 当前月<br />     柱图.当前图例颜色 ＝ 取颜色值 (取随机数 (, ), 取随机数 (, ), 取随机数 (, ))<br />     柱图.当前X轴标注文字 ＝ 部门列表 [次]<br />     柱图.当前图例索引 ＝ 0<br />     柱图.当前数据值 ＝ 月统计<br /> <br />     月统计 ＝ 0<br />     循环次数 ＝ 0<br />     执行SQL语句 (数据连接, “select * from it_haocai WHERE b4='” ＋ 部门列表 [次] ＋ “' and b2>='” ＋ 上一月 ＋ “-1' and b2<'” ＋ 当前月 ＋ “-1'”)<br />     连接句柄 ＝ 取记录集 (数据连接)<br />     .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />         到指定行 (连接句柄, 循环次数 － 1)<br />         读字段值 (连接句柄, “b7”, 统计)<br />         月统计 ＝ 月统计 ＋ 统计<br />     .计次循环尾 ()<br />     柱图.当前图例索引 ＝ 1<br />     柱图.当前图例文字 ＝ 上一月<br />     柱图.当前数据值 ＝ 月统计<br /> <br />     月统计 ＝ 0<br />     循环次数 ＝ 0<br />     执行SQL语句 (数据连接, “select * from it_haocai WHERE b4='” ＋ 部门列表 [次] ＋ “' and b2>='” ＋ 上二月 ＋ “-1' and b2<'” ＋ 上一月 ＋ “-1'”)<br />     连接句柄 ＝ 取记录集 (数据连接)<br />     .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />         到指定行 (连接句柄, 循环次数 － 1)<br />         读字段值 (连接句柄, “b7”, 统计)<br />         月统计 ＝ 月统计 ＋ 统计<br />     .计次循环尾 ()<br />     柱图.当前图例索引 ＝ 2<br />     柱图.当前图例文字 ＝ 上二月<br />     柱图.当前数据值 ＝ 月统计<br /> <br />     次 ＝ 次 ＋ 1<br />     月统计 ＝ 0<br />     循环次数 ＝ 0<br /> .计次循环尾 ()<br /> 柱图.Y轴单位 ＝ 到文本 ((取启动时间 () － N) ÷ 1000) ＋ “S”<br /> 调试输出 (“结束”)<br /> <br /> .子程序 耗材图柱<br /> .局部变量 次, 整数型<br /> .局部变量 循环次数, 整数型<br /> .局部变量 统计, 整数型<br /> .局部变量 月统计, 整数型<br /> .局部变量 当前月, 文本型<br /> .局部变量 上一月, 文本型<br /> .局部变量 上二月, 文本型<br /> .局部变量 N, 整数型<br /> <br /> N ＝ 取启动时间 ()<br /> 当前月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, 0))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, 0)))<br /> 上一月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -1))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -1)))<br /> 上二月 ＝ 到文本 (取年份 (增减时间 (取现行时间 (), #月份, -2))) ＋ “-” ＋ 到文本 (取月份 (增减时间 (取现行时间 (), #月份, -2)))<br /> <br /> 耗材柱图.X轴标注数量 ＝ 取数组成员数 (耗材列表)<br /> 耗材柱图.图例数量 ＝ 3<br /> <br /> .计次循环首 (耗材柱图.X轴标注数量, 次)<br />     执行SQL语句 (数据连接, “select * from it_haocai WHERE b5='” ＋ 耗材列表 [次] ＋ “' and b2>='” ＋ 当前月 ＋ “-1'”)<br />     连接句柄 ＝ 取记录集 (数据连接)<br />     .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />         到指定行 (连接句柄, 循环次数 － 1)<br />         读字段值 (连接句柄, “b7”, 统计)<br />         月统计 ＝ 月统计 ＋ 统计<br />     .计次循环尾 ()<br />     耗材柱图.当前X轴标注索引 ＝ 次<br />     耗材柱图.当前图例文字 ＝ 当前月<br />     耗材柱图.当前图例颜色 ＝ 取颜色值 (取随机数 (, ), 取随机数 (, ), 取随机数 (, ))<br />     耗材柱图.当前X轴标注文字 ＝ 耗材列表 [次]<br />     耗材柱图.当前图例索引 ＝ 0<br />     耗材柱图.当前数据值 ＝ 月统计<br /> <br />     月统计 ＝ 0<br />     循环次数 ＝ 0<br />     执行SQL语句 (数据连接, “select * from it_haocai WHERE b5='” ＋ 耗材列表 [次] ＋ “' and b2>='” ＋ 上一月 ＋ “-1' and b2<'” ＋ 当前月 ＋ “-1'”)<br />     连接句柄 ＝ 取记录集 (数据连接)<br />     .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />         到指定行 (连接句柄, 循环次数 － 1)<br />         读字段值 (连接句柄, “b7”, 统计)<br />         月统计 ＝ 月统计 ＋ 统计<br />     .计次循环尾 ()<br />     耗材柱图.当前图例索引 ＝ 1<br />     耗材柱图.当前图例文字 ＝ 上一月<br />     耗材柱图.当前数据值 ＝ 月统计<br /> <br />     月统计 ＝ 0<br />     循环次数 ＝ 0<br />     执行SQL语句 (数据连接, “select * from it_haocai WHERE b5='” ＋ 耗材列表 [次] ＋ “' and b2>='” ＋ 上二月 ＋ “-1' and b2<'” ＋ 上一月 ＋ “-1'”)<br />     连接句柄 ＝ 取记录集 (数据连接)<br />     .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />         到指定行 (连接句柄, 循环次数 － 1)<br />         读字段值 (连接句柄, “b7”, 统计)<br />         月统计 ＝ 月统计 ＋ 统计<br />     .计次循环尾 ()<br />     耗材柱图.当前图例索引 ＝ 2<br />     耗材柱图.当前图例文字 ＝ 上二月<br />     耗材柱图.当前数据值 ＝ 月统计<br /> <br />     次 ＝ 次 ＋ 1<br />     月统计 ＝ 0<br />     循环次数 ＝ 0<br /> .计次循环尾 ()<br /> 耗材柱图.Y轴单位 ＝ 到文本 ((取启动时间 () － N) ÷ 1000) ＋ “S”<br /> 调试输出 (“结束”)<br /> <br /> <br /> <br /> <br /> .子程序 耗材明细表<br /> .局部变量 循环次数, 整数型<br /> .局部变量 取数据, 文本型, , "8"<br /> .局部变量 索引, 整数型<br /> <br /> ' N ＝ 取启动时间 ()<br /> 执行SQL语句 (数据连接, “select * from it_haocai WHERE b2>='” ＋ 到文本 (取年份 (取现行时间 ())) ＋ “-” ＋ 到文本 (取月份 (取现行时间 ())) ＋ “-1'”)<br /> 连接句柄 ＝ 取记录集 (数据连接)<br /> 明细表.行数 ＝ 取记录集行数 (连接句柄) ＋ 1<br /> .计次循环首 (取记录集行数 (连接句柄), 循环次数)<br />     到指定行 (连接句柄, 循环次数 － 1)<br />     读字段值 (连接句柄, “b2”, 取数据 [1])<br />     读字段值 (连接句柄, “b3”, 取数据 [2])<br />     读字段值 (连接句柄, “b4”, 取数据 [3])<br />     读字段值 (连接句柄, “b5”, 取数据 [4])<br />     读字段值 (连接句柄, “b6”, 取数据 [5])<br />     读字段值 (连接句柄, “b7”, 取数据 [6])<br />     读字段值 (连接句柄, “b8”, 取数据 [7])<br />     读字段值 (连接句柄, “b9”, 取数据 [8])<br />     索引 ＝ 索引 ＋ 1<br />     明细表.置数据 (索引, 0, 1, 取数据 [1])<br />     明细表.置数据 (索引, 1, 1, 取数据 [2])<br />     明细表.置数据 (索引, 2, 1, 取数据 [3])<br />     明细表.置数据 (索引, 3, 1, 取数据 [4])<br />     明细表.置数据 (索引, 4, 1, 取数据 [5])<br />     明细表.置数据 (索引, 5, 1, 取数据 [6])<br />     明细表.置数据 (索引, 6, 1, 取数据 [7])<br />     明细表.置数据 (索引, 7, 1, 取数据 [8])<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 _耗材报表_可否被关闭, 逻辑型<br /> <br /> 耗材报表.可视 ＝ 假<br /> 主窗口.维护按钮.选中 ＝ 假<br /> 返回 (假)<br /> <br /> .子程序 _重新加载_被选择<br /> <br /> 耗材报表.销毁 ()<br /> 处理事件 ()<br /> 载入 (耗材报表, , 假)<br /> 返回 ()<br /> <br /> <br /> .子程序 _耗材报表_鼠标右键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 弹出菜单 (菜单, , )<br /> <br /> .子程序 _耗材报表_尺寸被改变<br /> <br /> .如果真 (耗材报表.位置 ＝ 3)<br />     柱图.宽度 ＝ 耗材报表.宽度 － 15<br />     耗材柱图.宽度 ＝ 耗材报表.宽度 － 15<br />     明细表.宽度 ＝ (耗材报表.宽度 － 15) ÷ 2<br />     统计表.宽度 ＝ (耗材报表.宽度 － 15) ÷ 2 － 5<br />     统计表.左边 ＝ (耗材报表.宽度 － 15) ÷ 2 ＋ 10<br />     统计表.高度 ＝ 耗材报表.高度 － 360<br />     明细表.高度 ＝ 耗材报表.高度 － 360<br />     返回 ()<br /> .如果真结束<br /> .如果真 (耗材报表.位置 ＝ 0)<br />     柱图.宽度 ＝ 985<br />     耗材柱图.宽度 ＝ 985<br />     明细表.宽度 ＝ 490<br />     统计表.宽度 ＝ 490<br />     统计表.高度 ＝ 335<br />     明细表.高度 ＝ 335<br />     统计表.左边 ＝ 500<br />     耗材报表.左边 ＝ (取屏幕宽度 () － 1000) ÷ 2<br />     耗材报表.顶边 ＝ (取屏幕高度 () － 700) ÷ 2<br /> .如果真结束<br /> 返回 ()

这是代码，请大神帮忙看下。
其中数据连接，这个是全局连接mysql的变量，用一个子程序装着的。
暂时三条线程，单独用哪一条都正常。

jcos

yiran5875 发表于 2019-11-4 21:27
建议你先把源码放上来看看

代码放上来了，麻烦帮忙看下，谢谢。