插入筛选树
从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
2、新建一个窗口,在窗口中插入一个Table控件,将其类型改为SQLTable,将其Select语句设置为: Select * From {订单}
3、在窗口中插入一个FilterTree控件。
4、在窗口的AfterLoad时间中加上代码:
Dim
trv As
WinForm.FilterTree
= e.Form.Controls("FilterTree1")
trv.Build(Tables("窗口1_Table1"),
"日期 YM|产品")