for CurrentItem := 0 to TreeView.Items.Count - 1 do
begin
if TreeView.Items[CurrentItem].Text = DataItem then
begin
//Do something
break;
end;
end;
begin
if TreeView.Items[CurrentItem].Text = DataItem then
begin
//Do something
break;
end;
end;
调试欢乐多
就node=TreeView.Items.Item[0];
node=node.getNextSibling();
node=node.getNextSibling();
//找到第三根点
node=node.item[1];
//找到第2子点
node=node.item[4]
//找到第2子点的第5子点啦!!!
TempNode:TTreeNode;
begin
TempNode:=TreeView1.TopItem;
while TempNode<>nil do
begin
判断TempNode是不是你要找的节点
是则退出
否则:TempNode:=TempNode.NextNode
end;
i:integer;
ResultItem:TTreeNode;
begin
for i:=0 to TreeView1.Items.Count-1 do
if TreeView1.Items[i].Text=指定文本 then
begin
ResultItem:=TreeView1.Items[i];
break;
end; ResultItem就是你要的节点
begin
node=node.parent
node.expanded=true
end;
//这样你就展开了
比如有一个点,是分公司X-〉部门X->小组X->个人X
那么用
while node.text<>分公司X or node.index<=node.parent.count then
node=node.getNextSibling();
//判断是否出界
node=node.item[0];
while node.text<>部门X or node.index<=node.parent.count then
node=node.getNextSibling();
........