新锐下载

下你所需,载你所想!
IT技术源码资料下载网站

自绘树形框源码TreeView支持自由扩展

作者:清柠 人气: 来源:易语言 2019-10-10 22:05:31

自绘树形框源码TreeView支持自由扩展

.版本 2

' // 获取项目索引
项目索引 = Tree.坐标取项目 (纵向位置)
缺点:1因为用的是画板所以操作过快会闪烁,如果你愿意你只需要少量修改代码将绘图对象转移到GDI,或DX,此问题定能轻松搞定

' // 设置现行选中项目
Tree.现行选中项 (项目索引)
' // 设置点燃项目
Tree.设置点燃项目 (项目索引)
' // 设置项目展开状态
.如果真 (Tree.是否扩展 (Tree.XS_GetItemPosition (项目索引)) = 假)
Tree.扩展 (Tree.XS_GetItemPosition (项目索引))
Tree.Renovate ()
Tree.更新滚动位置 ()
返回 ()
.如果真结束
Tree.收缩 (Tree.XS_GetItemPosition (项目索引))
Tree.Renovate ()
Tree.更新滚动位置 ()

官方微信二维码 新锐官方微信公众号