我希望选定的列表数据填充树
这是我的尝试
if ListView1.Items[Count].Selected then
begin
Root := ListView1.Items[Count].Caption;
for Itr := TreeView1.Items.Count-1 downto 0 do Begin
if TreeView1.items[itr].Parent.Text = Root then begin
TreeNode := TreeView1.Items[itr].getFirstChild;
Treeview1.Items.AddChild(Treenode,ListView1.Items[Count].SubItems[0]);
break;
end;
end;
end;
但是它创建新节点并且存在索引错误。
请帮助
答案 0 :(得分:2)
您尚未提供任何有关您的ListView数据的详细信息,或者TreeView 假设与该数据相关的内容。但我怀疑你的代码应该看起来更像这样:
if ListView1.Items[Count].Selected then
begin
Root := ListView1.Items[Count].Caption;
for Itr := TreeView1.Items.Count-1 downto 0 do begin
TreeNode := TreeView1.Items[itr];
if TreeNode.Text = Root then begin
TreeView1.Items.AddChild(TreeNode, ListView1.Items[Count].SubItems[0]);
break;
end;
end;
end;
请注意,向后遍历TreeView 是非常低效的。树本身不是可索引的,因此每次通过索引通过TreeView1.Items[]
属性访问节点时,它必须从树中的第一个节点开始,并迭代转发计数节点,直到它到达指定的索引。您正在向后访问的每个节点重复相同的正向扫描。这是很多浪费的开销。