PB树形控件勾选联动

做PB树形控件的时候需要勾选联动，从网上找了个方案，但是对向上勾选支持的不是很好，自己做了点优化，希望可以帮到别人

首先treeview需要勾选 checkboxes属性

在tv_1.clicked事件中增加代码

TreeViewItem ltvitem
getitem(handle, ltvitem)

post event ue_statechanged(handle, ltvitem.statepictureindex)

在树形控件中新增函数 ue_statechanged(long handle,integer prevstate)   代码如下

treeviewitem ltvi_item
getitem(handle, ltvi_item)

if ltvi_item.statepictureindex = prevstate then
    return
else
    this.Event ue_synchronizechildren(handle,ltvi_item.statepictureindex)    //这个函数包含了向下的选中和取消
    this.Event ue_synchronizeparent(handle,ltvi_item.statepictureindex)       //优化了这个函数
end if

在树形控件新增函数 ue_synchronizechildren(long handle,integer state) 代码如下

long ll_childitem
treeviewitem ltvi_item
getitem(handle, ltvi_item)
ltvi_item.statepictureindex = state
setitem(handle, ltvi_item)
ll_childitem = this.fin