delphi中代码控制节点选中

来源:百度知道 编辑:UC知道 时间:2024/05/31 08:51:47
我delphi里面有一个treeView
我想点击一个按钮之后 默认选中某个节点
该怎么写代码啊?
//选中树的节点
for i:=0 to Tree.Items.Count-1 do
begin
M := Tree.Items[i].Data;
if (M.ID = key) then
begin
Tree.Items[i].Selected := True;
break;
end;
end;

标准的答案

在按钮的OnClick事件中对treeview的节点进行循环,找到符合条件的节点, 将其选中

for i := 0 to TreeView1.Items.Count - 1 do // Iterate
begin
if TreeView1.Items[i].Text = 'SELECT' then
begin
TreeView1.Select(TreeView1.Items[i], []);
TreeView1.SetFocus;
end;
end; // for