做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