以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]级码列行排序  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173520)

--  作者:湛江智
--  发布时间:2021/12/3 11:26:00
--  [求助]级码列行排序
1求助 级码
Tables("级码").Sort = "级码"
排序后怎么保存排序?
2 求助LayersTree右键  增加子行后,自动行排序符合Tables("级码").Sort = "级码"

--  作者:有点蓝
--  发布时间:2021/12/3 11:30:00
--  
1、排序是临时的,无法保存
2、没看懂什么问题

--  作者:湛江智
--  发布时间:2021/12/3 11:35:00
--  回复:(有点蓝)1、排序是临时的,无法保存2、没看懂...
例如当前表有8行,普通型树右键新增子级码列 1.1 这个行,自动新增在表最后1行(不是想要的效果)
1 项目事件
2 计划管理
3 表事件
4 窗口表事件
5 窗口与控件事件
6 自定义函数
7 全局代码
8 菜单事件
1.1 BeforeConnectOuterDataSource(普通型树右键新增子级码的行在这里)

求助行排序按级码列值,不用每次临时排序

1 项目事件
1.1 BeforeConnectOuterDataSource(求助级码列 1.1 这行位置在这里)
2 计划管理
3 表事件
4 窗口表事件
5 窗口与控件事件
6 自定义函数
7 全局代码
8 菜单事件


[此贴子已经被作者于2021/12/3 11:36:26编辑过]

--  作者:有点蓝
--  发布时间:2021/12/3 11:52:00
--  
普通型树指哪个?层级筛选树?还是自己做的目录树编辑功能?
--  作者:湛江智
--  发布时间:2021/12/3 12:01:00
--  回复:(有点蓝)普通型树指哪个?层级筛选树?还是自...
Dim trv As WinForm.LayersTree = e.Form.Controls("LayersTree1")
Dim st As New LayerTreeSetting
st.PathCol = "级码"
st.TextCol = "zfwl"
st.ValueCol = "zssl"
st.Separator = "."
st.GridTree = True
st.Unique = True
trv.BuildFilterTree(Tables("tb_ptx"),st)


上面代码生成的树,求助按级码 列值行排序能保存。新建子级码自动行排序正确(按级码列的值)
[此贴子已经被作者于2021/12/3 12:11:49编辑过]

--  作者:有点蓝
--  发布时间:2021/12/3 13:41:00
--  
更新到最新版本,子菜单有插入节点功能