You are here

menu bar 만들기 - 에러메시지

menu .menubar

#attach it to the main window

. config -menu .menubar

#create more cascade menus

foreach m {File Help} {
        set $m [menu .menubar.m$m]
        .menubar add cascade -label $m -menu .menubar.m$m
}
$File add command -label Quit -command exit

라는 코드를 작성하였습니다. 이렇게 하여 만들어진 창에 마우스를 가져다 대면

Error unkown option "-type"
unknown option "-type"
    while executing
". cget -type"
    (command bound to event)

라는 에러메시지가 뜨고, 확인 버튼을 누르면

bad option "index": must be cget or configure
    while executing
"$menu index active"
    (procedure "tk::MenuLeave" line 4)
    invoked from within
"tk::MenuLeave . 282 211 8"
    (command bound to event)

라는 에러메시지가 뜹니다.

에러 메시지 없이 실행할 수는 없나요. 그리고 이 메시지는 왜 뜨는건가요?