一种树型控件在Delphi中的使用方法2008-04-20袁军 黄树成 朱霞摘 要 树型控件是一种有效的表示方法,在数据库应用程序的开发中经常用它可视化表示对象之间的层次关系。本文介绍了Developer Express inc. 的ExpressQuantumGrid Suite中树型控件 TdxDBTreeList 的使用方法和技巧,特别是由多关系表构成树型结构的情况。关键词 树型控件,TdxDBTreeList,多关系表简介树型控件是一种有效的表示方法,在数据库应用程序的开发中经常用它可视化表示对象之间的层次关系,便于用户的操作和使用。比如:表示一个公司部门的层次结构;磁盘文件系统等。Borland 公司的Delphi 开发系统提供了一般的树型控件TTreeView,它可以在设计时或运行时生成必要的树型结构图,方法是通过生成控件对象的 Items 属性。设计时方式通过手工方式增加items,主要适用于静态、少量的 items 的情况;运行时方式通过程序生成树型结构的 items,它既适合静态又可用于动态的情况。在实际工作中,树状结构中的 items 经常来自数据库的一个或若干个关系表中,若想利用 TTreeView 控件生成相关的树状结构,设计时方式很难实现,运行时方式虽然可以实现,但需要程序员设计大量的代码,而且容易出错。因此,为了提高开发效率,减少重复开发,我们必须使用 data-aware 树型控件。Developer Express inc. 的ExpressQuantumGrid Suite 中树型控件TdxDBTreeList 属于 data-aware 型,items 不仅可以来自数据库的关系表,而且可以为数组等其它数据源。本文介绍了TdxDBTreeList 的使用方法和技巧,特别是由多关系表构成树型结构的情况。TdxDBTreeList 概述Developer Express inc. 开发的The ExpressQuantumGrid Suite 包含三个功能强大的控件,它们分别是:TdxTreeList 、 TdxDBTreeList 和 TdxDBGrid。TdxDBTreeList 直接继承于 TCustomdxDBTreeListControl ,它是 data-aware 型的,不仅结合标准的树型视图和列表控件的特性,而且具有独特的特性:运行时列定制、一个树结点内编辑任意列的能力和由dataset 生成树结构。使用该树型控件关键是设定属性页中几个重要的属性,分别为:DataSource、KeyField、ParentField 和 Bands。其中 DataSource 为提供树型结构的数据源,可以为来自一个或若干个关系表的元组的集合,因此它是必须的且不为空;KeyField 为 DataSource 的元组中唯一标识自身的关键码;树型控件表示的是对象之间的层次关系,除树根结点之外(最上层项目),每一个结点都有一个唯一的双亲结点(直接上层结点)。ParentField 即是元组中标识其双亲结点的 KeyField 。根结点的 ParentField 值必须不是 DataSource 代表的元组中 KeyField 值之一;Bands 控制树型结构显示的列数,通过它提供的 Add 方法增加合适的 Columns ,Columns 有两个重要的属性:Caption 和 FieldName 。Caption 可以设定树型结构的标题,FieldName 代表 DataSource 的元组表示树型结构项目的字段。例如用如下的部门关系表作为 DataSource 形成树型结构:表1 unti 关系表
UnitNo | unitName | superiorUnit |
0000 | 东南大学 | -1 |
0001 | 计算机系 | 0000 |
000101 | 硬件教研室 | 0001 |
000102 | 软件教研室 | 0001 |
0002 | 外语系 | 0000 |
000201 | 大外教研室 | 0002 |
000202 | 专外教研室 | 0002 |
其中,unitNo 表示部门号;unitName 部门名称;superiorUnit 上级部门号。KeyField 设为unitNo;ParentField 设为 superiorUnit ;Bands 的一列 Columns 的 FieldName 设为 unitName 。这样形成如图1所示的树型结构。

图1 树型结构示例图