Tcl / Tk: Могу ли я создать меню в окне not_main? - PullRequest
Новая
       86

Tcl / Tk: Могу ли я создать меню в окне not_main?

0 голосов
/ 09 октября 2019

Tcl / Tk: можно ли создать меню в окне not_main? (например, во вкладках блокнотов) 

NoteBook ${pane_top}.tabs \
    -borderwidth 2 \
    -arcradius 3

set tabs_code [${pane_top}.tabs insert end code -text [_ "code"]]
$tabs_code configure -borderwidth 2

menu  .pane.top.tabs.fcode.m
.pane.top.tabs.fcode.m add command -command filecmd   -label File
.pane.top.tabs.fcode.m add command -command searchcmd -label Search
.pane.top.tabs.fcode.m add command -command helpcmd   -label Help

proc filecmd {} {tk_messageBox -message Filing!}
proc searchcmd {} {tk_messageBox -message Searching!}
proc helpcmd {} {tk_messageBox -message Helping!}

, если: 

pack  .pane.top.tabs.fcode.m -side left

ошибка: 

can't pack ".pane.top.tabs.fcode.m": it's a top-level window
...