超级列表框删除选中项后，不会自动重新排序ID。

疯狂雪狼

疯狂雪狼 发表于 2013-5-16 18:08
这个序号重新排序，怎样才能让他重新排序的时候从1开始排序，目前是从0开始排序的。另外就是这个导入的QQ ...

你好！新发了一个帖子，地址：http://bbs.125.la/thread-13650235-1-1.html

疯狂雪狼

YJF 发表于 2013-5-16 14:19

你好！你这个QQ密码后面的一列，状态这个里面的那些未登录、登录成功、帐号异常、密码错误、有验证码，这些是怎么实现的啊，这种状态在做需要登入帐号的软件时，都很有帮助。能否共享下关于这个列表框的代码。非常感谢！

yxy190213

筛选，删除，排序

  

子程序名	返回值类型	公开	备 注
清理失效

变量名	类 型	静态	数组	备 注
局_当前行	整数型
局_删除	逻辑型

局_当前行 ＝ 0
计次循环首 (超框_数据.取表项数 (), )
如果 (超框_数据.取标题 (局_当前行, 3) ＝ “删除这一行”)
超框_数据.删除表项 (局_当前行)
局_删除 ＝ 真

局_当前行 ＝ 局_当前行 ＋ 1

超框_数据.置标题 (局_当前行, 0, 到文本 (局_当前行 ＋ 1))
计次循环尾 ()
如果 (局_删除 ＝ 真)
信息框 (“删除完成”, 0, , )

信息框 (“当前没有需要删除的行！”, 0, , )

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 清理失效<br /> .局部变量 局_当前行, 整数型<br /> .局部变量 局_删除, 逻辑型<br /> <br /> <br /> 局_当前行 ＝ 0<br /> <br /> .计次循环首 (超框_数据.取表项数 (), )<br /> <br />     .如果 (超框_数据.取标题 (局_当前行, 3) ＝ “删除这一行”)<br /> <br />         超框_数据.删除表项 (局_当前行)<br /> <br />         局_删除 ＝ 真<br /> <br />     .否则<br />         局_当前行 ＝ 局_当前行 ＋ 1<br />     .如果结束<br /> <br />     超框_数据.置标题 (局_当前行, 0, 到文本 (局_当前行 ＋ 1))<br /> <br /> .计次循环尾 ()<br /> <br /> .如果 (局_删除 ＝ 真)<br /> <br />     信息框 (“删除完成”, 0, , )<br /> <br /> .否则<br />     信息框 (“当前没有需要删除的行！”, 0, , )

绽放青春

1111111111111111111111