tcl tk guiのフレームを非表示にする

Question

代わりに隠されて表示されるフレームを作りたい。問題は、Tkがhide/unpackコマンドを提供していないことです。私はvtclを使用しており、最上位にウィンドウを隠すだけの "Window hode"オプションがあります。今私はフレームを隠し、後で同じフレームを再び表示したい。これは、1つのフレームをアンパックし、他のフレームを表示することと考えることができます。私のコードは次のようにすることができる：この手順で

proc show1hide2 { } { 
    global i top 
    if {$i == 1} { 
     unpack $top.frame1 
     pack $top.frame2 
     set i 0 
    } else { 
     unpack $top.frame2 
     pack $top.frame1 
     set i 1 
    } 
} 

、$top.frame1と$top.frame2は、以前に充填し、$iの値は、$top.frame1従ってトグルされ、このPROCが呼び出されたとき$top.frame2が交互に示されています。すべて、私はそれが存在し、これを行うのを助けることができるunpackのようなコマンドがあることを知りたいですか？ちなみに、unpackは単なるアイデアです。

私はあなたが探しているものかもしれません パックはコマンドを忘れていると思い

Answer 1

：

proc toggle {} { 
    global state 
    if {$state == 1} { 
     pack forget .r 
     pack .g -side bottom -fill x 
     set state 0 
    } else { 
     pack forget .g 
     pack .r -side bottom -fill x 

     set state 1 
    } 
} 

set state 1 

# Make the widgets 
label .r -text "Red Widget" -bg red 
label .g -text "Green Widget" -bg green 
button .tog -text "Toggle" -command toggle 
# Lay them out 
pack .tog 
pack .r -side bottom -fill x