社区
PowerBuilder
帖子详情
PB生成的树
bedsb
2017-03-15 01:38:38
PB生成的树的结构,能够类似资源管理器的时候,,把节点拖拽,放在任意的分支上?有没有类似例子代码?
...全文
835
6
打赏
收藏
PB生成的树
PB生成的树的结构,能够类似资源管理器的时候,,把节点拖拽,放在任意的分支上?有没有类似例子代码?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
bedsb
2017-03-20
打赏
举报
回复
我拖动的时候没有效果,是不是树的那个属性还要设置?
bedsb
2017-03-17
打赏
举报
回复
我直接复制过去,调试就可以?
WorldMobile
2017-03-17
打赏
举报
回复
引用 4 楼 bedsb的回复:
gf_writeerrors(),of_changecode 这个2个函数能不能粘出啦
直接屏幕掉,这段代码是让你参考的,不是能直接实现你的功能
bedsb
2017-03-17
打赏
举报
回复
gf_writeerrors(),of_changecode 这个2个函数能不能粘出啦
WorldMobile
2017-03-16
打赏
举报
回复
可参考代码如下 在dragdrop事件中: Long ll_NewItem TreeViewItem ltvi_Target//目标 TreeViewItem ltvi_Source//源 TreeViewItem ltvi_Parent//父节点 TreeViewItem ltvi_New dec lc_id dec lc_pid string ls_sql If GetItem(il_DropTarget, ltvi_Target) = -1 Then Return If GetItem(il_DragSource, ltvi_Source) = -1 Then Return lc_id = dec( ltvi_Source.data ) lc_pid = dec ( ltvi_Target.data ) SetDropHighlight(0) GetItem(il_DragParent, ltvi_Parent) If messagebox( "","您确定移动 " + & ltvi_Source.Label + " 从 " + ltvi_Parent.label + " 到 " + ltvi_Target.label + & "?", Question!, YesNo!,1) = 2 Then Return ls_sql = "update " + is_tablename + & " set pid = " + string( lc_pid ) + & ",operator = " + string( gc_userid ) + & " where id = " + string( lc_id ) execute immediate :ls_sql; ////messagebox("",ls_sql) //update sys_org //set pid =:lc_pid //where id = :lc_id using sqlca; if sqlca.sqlcode <> 0 then rollback; messagebox( "","更新机构失败!9" +sqlca.sqlerrtext,stopsign!) gf_writeerrors() return else // commit; long res res = parent.of_changecode(lc_id,lc_pid) if res <> -1 then commit; DeleteItem(il_DragSource) SetNull(ltvi_Source.ItemHandle) ltvi_New.data = ltvi_Source.data ltvi_New.label = ltvi_Source.label ltvi_New.pictureindex = ltvi_Source.pictureindex ltvi_New.selectedpictureindex = ltvi_Source.selectedpictureindex ltvi_New.children = ltvi_Source.children ll_NewItem = InsertItemSort(il_DropTarget, ltvi_New) SelectItem(ll_NewItem) else rollback; messagebox( "","更新机构失败!",stopsign!) gf_writeerrors() return end if end if
WorldMobile
2017-03-16
打赏
举报
回复
可以实现拖动,但需要自己写代码
pb
动态
生成
树
pb
动态
生成
树
PB
菜单
生成
树
,以及
树
的查询,修改,删除
PB
菜单
生成
树
,以及
树
的查询,修改,删除等等
ELK/ELFK(7.3 ) 企业
PB
级日志系统实战
Elastic Stack日志系统是目前企业应用广泛的一套日志解决方案。 包含的组件有Filebeat,Logstash,Elastic,Kibana等 本堂课引入Kafka 让Elastic Stack 能适应企业
PB
级的业务日志量并弥补传统ELk架构的不足 ★学完这门课程会获得什么? 首先从零开始教你部署Elastic Stack系统, 详细讲解Elastic产品,包括 Kibana.Logstash,Beats的详细讲解以及Elastic的api操作, 并如何监控如何绘图等。最后结合自己的运维过程中的案例讲解,让学员能更加清楚了解原理以及少走一些弯路。 目前我们公司每天产生至少8个T的数据量,历史日志保存半年。此教程足以能承担
PB
级的日志收集系统的量。此教程的背景介绍请参阅我的CSDN博客,置顶内容的第一篇博文。
PB
表数据
生成
菜单和
树
PB
生成
treeview menu的案例
PB
中遍历
生成
树
及
树
的增、删、改
pb
8源码,
PB
中遍历
生成
树
及
树
的增、删、改 效果图:http://album.hi.csdn.net/app_uploads/liubocy/20081116/185328281.p.jpg?d=20081116185403171 在tv的ue_refresh事件的代码中,把ltvi_Item.data = '-1'改成ltvi_Item.data = '0',并把selectchanged事件代码注释掉
PowerBuilder
1,072
社区成员
66,436
社区内容
发帖
与我相关
我的任务
PowerBuilder
PowerBuilder 相关问题讨论
复制链接
扫一扫
分享
社区描述
PowerBuilder 相关问题讨论
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章