易语言列表框问题 如图,我已经用列表框读出了数据库edb内容,现在我想 右键单击列表框的项目时

易语言列表框问题

如图,我已经用列表框读出了数据库edb内容,现在我想 右键单击列表框的项目时候弹出菜单,然后删除列表框现行选中项。并且删除数据库对应的内容,不知道说的名不明白,懂的给我指点下 谢谢!!

如果读的时候是按照顺序读的,可以使用超列的表项索引+1得到数据库 对应列表当前选中的记录号,(不按顺序读自己想办法保存记录号 如使用超列表项的值,不保存就祈祷你的数据库中没有重名数据 直接枚举也行 就是效率低 资源占用多), 执行删除操作

追问

判断(列表框.现行选中项=0)
列表框.删除项目(0)
彻底删除

请问数据库要怎么写对应的记录字段啊

追答

刚才没传成功 现在能明白不?

追问

还是没看到

追答

等会刷新一下就出来了

追问

给我中间加一条代码就知道了,主要不知道怎么写判断之后那条

追答

.版本 2
.支持库 iext

.程序集 窗口程序集1

.子程序 _窗口1_创建完毕

打开 (“.\tmp.edb”, “edb”, , , , , )
_按钮_更新列表_被单击 ()

.子程序 _窗口1_将被销毁

关闭 (“edb”)
删除文件 (“.\tmp.edb”)

.子程序 _删除成员_被选择, , , 这个是弹出的菜单项目
.局部变量 i, 整数型

超级列表框1.删除表项 (超级列表框1.现行选中项)
跳到 (超级列表框1.现行选中项 + 1)
删除 ()
彻底删除 ()

.子程序 _超级列表框1_右键单击表项

.如果真 (超级列表框1.现行选中项 ≠ -1)
弹出菜单 (菜单, 取鼠标水平位置 (), 取鼠标垂直位置 ())
.如果真结束

.子程序 _按钮_更新列表_被单击
.局部变量 i, 整数型

超级列表框1.全部删除 ()
到首记录 ()
.计次循环首 (取记录数 (), )
i = 超级列表框1.插入表项 (, 读 (“name”), , , 0, )
超级列表框1.置标题 (i, 1, 到文本 (读 (“int”)))
跳过 ()
.计次循环尾 ()

温馨提示:答案为网友推荐,仅供参考

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网