社区
Delphi
帖子详情
使用过 Virtual Treeview 控件的高手,请进!!! 在线等待给分!
eastxiang
2004-10-25 09:10:03
两棵 Virtual Treeview 树,实现相互拖动,如何将节点DATA 传给对方!!!
急!!请帮忙!!
...全文
240
20
打赏
收藏
使用过 Virtual Treeview 控件的高手,请进!!! 在线等待给分!
两棵 Virtual Treeview 树,实现相互拖动,如何将节点DATA 传给对方!!! 急!!请帮忙!!
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
20 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
eastxiang
2004-10-26
打赏
举报
回复
谁都知道 “MOVETO不就是一边增加,一边删除?”
现在问题 不是如何MOVETO节点,而是Data是自动跟着Node,一起移动!
luckhacker
2004-10-26
打赏
举报
回复
MOVETO不就是一边增加,一边删除?
eastxiang
2004-10-26
打赏
举报
回复
有没有人进行“树间”MoveTo 呀!!??
eastxiang
2004-10-26
打赏
举报
回复
UP
eastxiang
2004-10-25
打赏
举报
回复
自己UP
eastxiang
2004-10-25
打赏
举报
回复
自己UP
eastxiang
2004-10-25
打赏
举报
回复
我现在就是要 “树间”的 MoveTo ,并且Data是自动跟着Node的,我搞了一天,没有搞定
quicksand201
2004-10-25
打赏
举报
回复
学习中……
--=====是用来做权限吗?=====--
myy
2004-10-25
打赏
举报
回复
“树间”的 MoveTo 我没用过,但是同树中MoveTo时,Data是自动跟着Node的。
eastxiang
2004-10-25
打赏
举报
回复
to myy() :
我现在的 两棵树的 节点DATA 结构一样!
如何用MoveTo 或 CopyTo 函数将DATA也移过来!!
myy
2004-10-25
打赏
举报
回复
可以用Virtual Treeview 的 MoveTo 或 CopyTo 函数,也支持“树间”。
两棵树的 节点DATA 应该一样才有意义。
onsavenode,onloadnode事件在 调用SaveToStream/LoadFormStream保存/恢复
整棵树时对每个Node触发,也可以用,但用在整树复制更好。
eastxiang
2004-10-25
打赏
举报
回复
to comanche(太可怕) :
请问 Virtual Treeview 的: onsavenode,onloadnode事件如何使用!??
comanche
2004-10-25
打赏
举报
回复
楼上的 lzy6204(为了忘却的记忆) 作法正确, 只不过他那个不是 virtual 的, 你这个得要手动的把 Data 从这个 数组也好, DataSet 也好, copy 过去, 删除原来 然后 Tree2.RootNodeCount 重设
procedure TForm1.TreeView1DragDrop(Sender, Source: TObject; X, Y: Integer);
var a:ttreenode;
begin
a:=TreeView1.GetNodeAt(X, Y);
从你的数组找到(a.Data), 加到另一数组
设 NodeCount
end;
asd4567
2004-10-25
打赏
举报
回复
高手们先帮我把两个TreeView互拖的问题解决一下撒,分不够我再给撒,很急的!
eastxiang
2004-10-25
打赏
举报
回复
请高手们就用 Virtual Treeview 的DEMO中 OLE.dpr 做过例子!谢谢!
eastxiang
2004-10-25
打赏
举报
回复
to: comanche(太可怕)
type
PNodeData = ^TNodeData;
TNodeData = record
Caption: WideString;
end;
----------------------------
procedure TMainForm.FormCreate(Sender: TObject);
begin
Tree1.NodeDataSize := SizeOf(TNodeData);
Tree1.RootNodeCount := 30;
Tree2.NodeDataSize := SizeOf(TNodeData);
Tree2.RootNodeCount := 30;
end;
------------------------
Tree1的Node 移到 Tree2.Node, 希望Data := Sender.GetNodeData(Node);也带过去!!
eastxiang
2004-10-25
打赏
举报
回复
是 Virtual Treeview 控件, 不是TTreeview 控制!
Virtual Treeview 控件可以在节点自定义数据结构(即DATA),移动时如何将一颗树的节点的DATA移植到另一颗树的相应节点!
comanche
2004-10-25
打赏
举报
回复
主要还是 id 字段, Caption 那个, 一个要删, 一个要加, 既然是 virtual 的 treeview 那你用什么存 Node? DataSet? 记得在完成操作后要重画一下
asd4567
2004-10-25
打赏
举报
回复
lzy6204能不能写得通用一些,他说的是两树之间的相互拖动撒
lzy6204
2004-10-25
打赏
举报
回复
先设Treeview1.DragMode :=[dmAutomatic]
再在TreeView2的 OnDragOver事件中令Accept:=true;
然后在TreeView2的DragDrop事件编程实现你的拖动、COPY功能。
procedure TForm1.TreeView1DragDrop(Sender, Source: TObject; X, Y: Integer);
var a:ttreenode;
begin
a:=TreeView1.GetNodeAt(X, Y);
TreeView1.Selected.MoveTo(a,naInsert)
end;
procedure TForm1.TreeView1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept:=Source=Sender;
end;
使用
ViewModel模式简化WPF
TreeView
本文探讨如何
使用
ViewModel模式来更轻松地
使用
WPF中的
TreeView
控件
。在此过程中,我们研究了为什么人们在
使用
WPF
TreeView
时经常遇到困难、什么是ViewModel,以及展示如何将
TreeView
与ViewModel结合的两个演示应用程序。其中一个演示展示了如何创建可搜索的
TreeView
,另一个演示如何实现延迟加载(也称为按需加载)。
<Qt> 常用
控件
Widget是Qt中的核心概念,英文原义是"小部件",此处将其翻译为"
控件
控件
是构成一个图形化界面的基本要素,如按钮、列表视图、树形视图、单行输入框、多行输入框、滚动条、下拉框等都可以称为"
控件
":Qt作为一个成熟的GUI开发框架,内置了大量的常用
控件
。这一点可以在QT Designer中看出端倪:并且Qt也提供了"自定义
控件
"的能力,可以在现有
控件
不能满足需求时,对现有
控件
做出扩展,或者自定义出新的
控件
。
QT基础教程3--视图
控件
QT中有四种单元视图组件,
分
别为列表视图QListView、树形视图Q
TreeView
、表格视图QTableView、列视图QColumnView。
VC
控件
CEdit重新审视 一个从没想过的问题今天终于出现了!我自己都感到以外!呵呵,什么问题呢?可能你也没想过哦。即使想过,你解答了没有? 是一个聊天的程序,类似于QQ的界面。简化一点说把。(注意是简化)一个基于对话框的的程序,只有2个编辑框m_edit1,m_edit2, 还有一个是按钮。现在我要做的就是在 m_edit2中输入,然后点击按钮,内容就跑到了m_edit1中。并且每次点击后...
VSFlexGrid
控件
1,如果想把某一列设置成下拉匡中选择,只能写成 grid.colcombolist(1) = "a|b|c" 吗?能不能把下拉框中的数据和 recordset 或数组绑定。 答案:grid.colcombolist(1)=grid.buildcombolist(rs!abc)2,怎样限定第三列可编辑,其他列不可编辑?答案:Private Sub fg_BeforeEdit(ByVal Row As...
Delphi
5,928
社区成员
262,931
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章