我想判斷每一個node的data值 請問該如何走訪完整棵樹呢? 謝謝!!

引言: 我想判斷每一個node的data值 請問該如何走訪完整棵樹呢? 謝謝!!

有兩種方法 1. 不管Parent child關係,依Create次序走訪每一個node for i:=0 to tv.items.count-1 do if tv.items[i].data<>nil then begin 2. 依parent,child關係 procedure NodeAct(t: TTreeNode); i:integer; begin ...do something here if t.HasChildren then for i := 0 to t.Count-1 do AddNodeToList(t.Item[i]); end;

2. 依parent,child關係 procedure NodeAct(t: TTreeNode); i:integer; begin ...do something here if t.HasChildren then for i := 0 to t.Count-1 do NodeAct(t.Item[i]); <--前面打錯了 end; 這是Recursive function, 傳入RootNode, recursive至每一Node

2. 依parent,child關係 procedure NodeAct(t: TTreeNode); i:integer; begin ...do something here if t.HasChildren then for i := 0 to t.Count-1 do NodeAct(t.Item[i]); <--前面打錯了 end; 這是Recursive function, 傳入RootNode, recursive至每一Node

2. 依parent,child關係 procedure NodeAct(t: TTreeNode); i:integer; begin ...do something here if t.HasChildren then for i := 0 to t.Count-1 do NodeAct(t.Item[i]); <--前面打錯了 end; 這是Recursive function, 傳入RootNode, recursive至每一Node

2. 依parent,child關係 procedure NodeAct(t: TTreeNode); i:integer; begin ...do something here if t.HasChildren then for i := 0 to t.Count-1 do NodeAct(t.Item[i]); <--前面打錯了 end; 這是Recursive function, 傳入RootNode, recursive至每一Node

我是使用BCB6 如下: for(int i=0;i<=TreeName->Items->Count-1;i ) { strItem=TreeName->Items->Item[i]->Text; . . } 而strItem就是我们想知道的Node值... 繁忙的塵囂是遊走的驛站