遍歷Tk的

Question

一個TTK :: TreeView的是有一個簡單的方法來遍歷一個Tcl/Tk的ttk::treview的項目，好像他們是在一個列表框的項目？例如：

   A 
      | |-- B 
    visit | | |-- C 
    order | | |-- D   ----> A B C D E F G 
      | E 
      V |-- F 
        |-- G 

據我所知，這將對應於遍歷序樹，這是，事實上，我目前的解決方案。因爲我確實有最大精度N一棵完整的樹，我可以這樣做：

foreach lev1 [.tree children {}] { 
    do_stuff $lev1 
    foreach lev2 [.tree children $lev1] { 
     do_stuff$lev2 
     foreach lev3 [.tree children $lev2] { 
      do_stuff $lev3 
       .... 
     } 
    } 
} 

，但我正在尋找一個更簡單的方法來做到這一點。

我曾考慮給每個節點添加一個標籤（說mytag），並使用：.tree tag has mytag來獲取所有節點的列表。問題是，AFAIK，由此產生的順序不能保證，我可能會以不同類型的訪問結束。

Answer 1

遞歸遍歷應該做的伎倆爲您服務。東西沿線

proc traverse {item} { 
    do_stuff $item 
    foreach [.tree children $item] { 
     traverse $item 
    } 
} 


.tree traverse {} 

感覺相當簡單了。

（聲明：我沒有實際測試過這一點）