0

tcl/Tk でウィンドウをドッキング可能にする方法はありますか?

Tcl 8.4 を使用していますが、アップグレードはオプションではありません。

4

1 に答える 1

1

wm manageコマンドにサブコマンドとwm forgetサブコマンドを導入したTk 8.5からのみ可能wmです。

詳細については、 TIP #125または最近の Tk マンページを参照してください。

Tcl 8.4 は 11 年後にサポートが終了しました。最後のリリースは 8.4.20 でした。その行に対する更新はこれ以上ありません。

wm manageとの簡単な例wm forget:

package require Tk 8.5

proc undock {b widget} {
    wm manage $widget
    $b configure -command [list dock $widget] -text "Dock"
}

proc dock {b widget} {
    wm forget $widget
    grid $widget -sticky news
    $b configure -command [list undock $widget] -text "Undock"    
}

frame .docked
button .docked.undock -command { undock .docked.undock .docked } -text "Undock"
grid .docked -sticky news
grid .docked.undock -sticky news
于 2013-07-22T10:25:58.700 に答える