我想做一个分组折叠式多选窗口 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

形式是这样的，只有第一层是折层的，其他层象表一样安列展开，因为象多选目录树哪样，逐层折叠，其它列就看不到，不便选择，勾选上一级多选框可同时选择或取消下一级所有数据，点确定按钮把勾选的数据录入单据中。

此主题相关图片如下：qq图片20220212111307.png

此主题相关图片如下：qq图片20220212111616.png

我看了一下

插入层级筛选树帮助

此主题相关图片如下：qq图片20220212114019.png

不是很懂，4、插入一个LayersTree(层级树)控件，把窗口中插入的Table覆盖吗？

1、打开CaseStudy目录下的示例文件: 筛选树.Table

是怎样的形式？能发图看看吗？

现在只实现到这效果，不能实现图二勾选月租停车就所有月租停车类被勾选。

此主题相关图片如下：qq图片20220212143546.png

理想的效果是勾选框象多选目录树那样在前面，勾选第一层的选项，自动勾选下级选项，不是象现在这样勾选框在后面。

分组，一组是月租停车收费，一组是临时收费。

[此贴子已经被作者于2022/2/12 14:58:09编辑过]

此主题相关图片如下：qq图片20220213202941.png

1、如何设置月租停车指定排在最前。

2、自动打开月租停车折点，临时停车折叠显示。

3、取消住址_序号列的汇总，它只是方便排序的附助列，没需要汇总。

With Tables("批量勾选_Table1")

.Cols("住址_巷").AllowEdit = False

.Cols("住址_号").AllowEdit = False

.Cols("住址_房").AllowEdit = False

.Cols("姓名").AllowEdit = False

.Cols("固定电话").AllowEdit = False

.Cols("手机号码").AllowEdit = False

.Cols("车牌号码").AllowEdit = False

.Cols("备注").AllowEdit = False

Dim st As New GroupTreeSetting()

st.GroupCols = {"分类"}

st.AggregateCols = {"住址_序号","住址_巷","住址_号","住址_房","姓名","固定电话","手机号码","车牌号码","备注"}

st.SortCol = "住址_序号"

.ShowGridTree(st)

.SetColVisibleWidth("分类|70|住址_序号|40|住址_巷|60|住址_号|40|住址_房|40|姓名|50|固定电话|80|手机号码|80|车牌号码|80|备注|140")

.SetHeaderRowHeight(20,20)

End With

With DataTables("批量勾选_Table1")

If .DataCols.Contains("勾选") = False Then

.DataCols.Add("勾选",Gettype(Boolean))

End If

End With

With Tables("批量勾选_Table1")

.Cols("勾选").Move(1)

.SetColVisibleWidth("分类|70|勾选|40|住址_序号|40|住址_巷|60|住址_号|40|住址_房|40|姓名|50|固定电话|80|手机号码|80|车牌号码|80|备注|140")

.SetHeaderRowHeight(20,20)

End With

[此贴子已经被作者于2022/2/13 20:38:06编辑过]

9楼的问题我补充了，你给的连接我都看过试过，根本不起作用，我要月租停车排在前,加上

st.SortCol = "分类"

st.SortDesc ＝ true

一点作用也没有，其实排序应涉及两列，分类的倒序，住址_序号，普通折叠的排序代码似乎不能执行这样的操作，倒序、顺序你们分开代码的。

[此贴子已经被作者于2022/2/13 21:30:30编辑过]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:小区车辆管理20220213.foxdb

1、要求月租停车在前，且安住址_序号顺序排序。

2、自动打开分类列月租停车折点，折叠临时停车折点。

3、取消住址_序号、住址_号、住址_房列的汇总。

你上传的文件无法打开。

[此贴子已经被作者于2022/2/14 13:27:15编辑过]

其实筛选树我也试过，提示只适用于主窗口，我写下的代码无法保存。

主题：我想做一个分组折叠式多选窗口