Foxtable(狐表)用户栏目专家坐堂 → [求助]级码列行排序


  共有3780人关注过本帖树形打印复制链接

主题:[求助]级码列行排序

帅哥哟,离线,有人找我吗?
湛江智
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:812 积分:6688 威望:0 精华:0 注册:2014/11/26 12:32:00
[求助]级码列行排序  发帖心情 Post By:2021/12/3 11:26:00 [只看该作者]

1求助 级码
Tables("级码").Sort = "级码"
排序后怎么保存排序?
2 求助LayersTree右键  增加子行后,自动行排序符合Tables("级码").Sort = "级码"

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/3 11:30:00 [只看该作者]

1、排序是临时的,无法保存
2、没看懂什么问题

 回到顶部
帅哥哟,离线,有人找我吗?
湛江智
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:812 积分:6688 威望:0 精华:0 注册:2014/11/26 12:32:00
回复:(有点蓝)1、排序是临时的,无法保存2、没看懂...  发帖心情 Post By:2021/12/3 11:35:00 [只看该作者]

例如当前表有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编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/3 11:52:00 [只看该作者]

普通型树指哪个?层级筛选树?还是自己做的目录树编辑功能?

 回到顶部
帅哥哟,离线,有人找我吗?
湛江智
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:812 积分:6688 威望:0 精华:0 注册:2014/11/26 12:32:00
回复:(有点蓝)普通型树指哪个?层级筛选树?还是自...  发帖心情 Post By: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编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/3 13:41:00 [只看该作者]

更新到最新版本,子菜单有插入节点功能

 回到顶部