易语言筛选问题

蚂蚁象

我现在需要弄个编辑框中输入信息，如只有1项，直接进主页面超级列表框，多项则进入复选窗口，回车将选中信息插进主页面的超级列表框，现在问题是，我还没写插入语句，多次选择都会报错，有没有大神指导下，是方法问题还是代码错了，谢谢兄弟

蚂蚁象

筛选代码
.版本 2
.支持库 eDB

.判断 (记录集_已选.记录数量 ＞ 1 且 记录集_已选.记录数量 ＜ 200)
    记录集_全 ＝ 记录集_已选
    载入 (复选窗口, , 真)

    编辑框_输入货号.内容 ＝ “”
    返回 ()
.判断 (记录集_已选.记录数量 ＞ 200)
    信息框 (“包含商品过多”, 48, “请确认”, POP主页面)
    编辑框_输入货号.内容 ＝ “”
    返回 ()

蚂蚁象

.版本 2
.支持库 iext

.子程序 _超级列表框_复选_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.局部变量 计数2, 整数型
.局部变量 q, 整数型




.如果真 (键代码 ＝ #回车键)
    q ＝ 窗口3_POP页面.超级列表框1.插入表项 (, , , , , )  ' 返回列表框的行数
    窗口3_POP页面.超级列表框1.置标题 (q, 0, 到文本 (q ＋ 1))
    窗口3_POP页面.超级列表框1.置标题 (q, 1, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 1))
    窗口3_POP页面.超级列表框1.置标题 (q, 2, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 2))
    窗口3_POP页面.超级列表框1.置标题 (q, 3, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 3))
    窗口3_POP页面.超级列表框1.置标题 (q, 4, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 4))
    窗口3_POP页面.超级列表框1.置标题 (q, 5, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 5))
    窗口3_POP页面.超级列表框1.置标题 (q, 6, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 6))
    窗口3_POP页面.超级列表框1.置标题 (q, 7, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 7))
    窗口3_POP页面.超级列表框1.置标题 (q, 8, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 8))
    窗口6.销毁 ()
插入代码

七彩色工作室

窗口6.销毁 () 这个是哪个窗口

蚂蚁象

七彩色工作室 发表于 2021-11-30 17:27
窗口6.销毁 () 这个是哪个窗口

复选的那个

蚂蚁象

现在情况就是，要么编辑框回车卡住然后报错，要么复选窗口回车报错卡死


另外说明下。窗口3就是图片主页面，窗口6为复选页面

蚂蚁象

后面代码我删了，一起上上来
.版本 2
.支持库 iext

.子程序 _超级列表框_复选_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.局部变量 计数2, 整数型
.局部变量 q, 整数型


.如果真 (键代码 ＝ #回车键)
    q ＝ 窗口3_POP页面.超级列表框1.插入表项 (, , , , , )  ' 返回列表框的行数
    窗口3_POP页面.超级列表框1.置标题 (q, 0, 到文本 (q ＋ 1))
    窗口3_POP页面.超级列表框1.置标题 (q, 1, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 1))
    窗口3_POP页面.超级列表框1.置标题 (q, 2, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 2))
    窗口3_POP页面.超级列表框1.置标题 (q, 3, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 3))
    窗口3_POP页面.超级列表框1.置标题 (q, 4, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 4))
    窗口3_POP页面.超级列表框1.置标题 (q, 5, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 5))
    窗口3_POP页面.超级列表框1.置标题 (q, 6, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 6))
    窗口3_POP页面.超级列表框1.置标题 (q, 7, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 7))
    窗口3_POP页面.超级列表框1.置标题 (q, 8, 超级列表框_复选.取标题 (超级列表框_复选.现行选中项, 8))
    窗口6.销毁 ()