下面示例一红字的代码,只针正表,副表不能用,如何实现副表也可以?
插入筛选树
从Foxtable 2022版开始,我们可以直接在窗口中插入内置的各种功能树。
我们先学习在窗口插入内置筛选树,关于筛选树的使用,可以参考:筛选树
示例一
1、打开CaseStudy目录下的示例文件: 基本功能演示.Table
2、新建一个窗口,在窗口中插入一个FilterTree控件。
3、在窗口的AfterLoad事件中加上代码:
Dim trv As WinForm.FilterTree = e.Form.Controls("FilterTree1")
trv.Build(Tables("订单"), "产品|客户")
大功告成,打开窗口,就会自动生成一个筛选树,点击这个筛选树中的节点,即可在订单表中筛选出对应的数据。
你可以根据年月来生成目筛选树,例如:
Dim trv As WinForm.FilterTree = e.Form.Controls("FilterTree1")
trv.Build(Tables("订单"), "日期 YM|产品")
更多的组合,可以参考Table的OpenFilterTree方法。
示例二
你也可以针对副本表、SQLTable和SQLQuery生成筛选树:
1、打开CaseStudy目录下的示例文件: 基本功能演示.Table
3、在窗口中插入一个FilterTree控件。
4、在窗口的AfterLoad时间中加上代码:
Dim trv As WinForm.FilterTree = e.Form.Controls("FilterTree1")
trv.Build(Tables("窗口1_Table1"), "日期 YM|产品")