为PB 的TreeView实现同步选择

为 PB 的 TreeView 实现同步选择

广州中山大学信息管理系 2001 级 梁冠超( 510275 )

TreeView 控件能够清晰地表示层次关系,因而赢得了众多程序员的喜爱。在 TreeView 编程中,常见的一个问题是同步选择(即选择一个节点时,同时选择该节点的所有子节点;不选一个节点,同时去除该节点的祖先节点选择标志)。

要实现这种效果,本来不难,只需要在检测到节点选择状态变化时,遍历节点的祖先或者后代节点进行同步即可。但是 PB 并没有提供检测节点选择状态变化的事件。怎么办呢?

让我们来看看 PB 中 TreeView 节点选择状态的表示。当 TreeView 的 CheckBoxes 属性为 True 时,每个节点包含一个复选框。选中复选框时, StatePictureIndex 属性为 2 ,未选中则为 1 。当选择某个节点时,首先触发 TreeView 的 Clicked 事件,处理完 Clicked 事件后再对 StatePictureIndex 进行设置。显然,如果我们能够将 Clicked 事件前后节点的 StatePictureIndex 属性值进行比较,我们就可以判断节点的选择状态是否发生了变化。按照这个思路,疏理 PB 的事件模型,发现采用 Post 的调用事件方法,可以实现将一个事件加入控件消息序列,在处理完当前事件后再对新加入的事件进行处理。至此,我们得到了如下的解决方案:

1. 为 TreeView 控件添加一个用户事件 ue_synchronizechildren(long handle, integer state) ,代码如下:

long childitem

treeviewitem tvitem

getitem(handle, tvitem)

tvitem.statepictureindex=state

setitem(handle, tvitem)

childitem=this.finditem(ChildTreeItem!, handle)

do while(childitem<>-1)

this.Event ue_synchronizechildren(childitem, state) // 递归遍历后代结点

childitem=this.finditem(NextTreeItem!, childitem)

loop

添加一个用户事件 ue_synchronizeparent(long handle, integer state) ,如下:

long parentitem

treeviewitem tvitem

getitem(handle, tvitem)

tvitem.statepictureindex=state

setitem(handle, tvitem)

parentitem=this.finditem(ParentTreeItem!, handle)

if parentitem<>-1 then

this.Event ue_synchronizeparent(parentitem, state)

end if

2. 添加一个用户事件 ue_statechanged(long handle, integer prevstate) 检测节点的选择状态 , 如果发生了变化则调用 ue_synchronizechildren 同步后代节点,并根据需要通过 ue_synchronizeparent 同步祖先节点。代码如下:

treeviewitem tvitem

getitem(handle, tvitem)

if tvitem.statepictureindex=prevstate then

return

else

this.Event ue_synchronizechildren(handle, tvitem.statepictureindex)

if tvitem.statepictureindex=1 then // 如需实现文末提及的功能,可在此处添加代码。

this.Event ue_synchronizeparent(handle, tvitem.statepictureindex)

end if

end if

3. 在 Clicked 事件中,添加如下调用:

treeviewitem tvitem

getitem(handle, tvitem)

post event ue_statechanged(handle, tvitem.statepictureindex)

为了简单起见,上面的代码并没有考虑当选上一个结点时,它的所有兄弟已被选择,因此父结点也应该被选择的情况,如有需要,请读者自己完成。

Published At
Categories with 数据库类
Tagged with
comments powered by Disqus