You are here

foreach를 이용한 생성 시.. 질문입니다

Tcl/Tk 완전 초보입니다.

현재, checkbutton을 이용, 여러 사항을 입력받을 수 있는 특정한 입력 상자를 똑같이 여러 개 화면에 표시하고 싶은데요, 이를 foreach를 사용하여 구현하였거든요.

그런데 다음과 같은 코드에서

foreach index $indexlist {
   checkbutton .topframe.button$index
      -text "write" -variable select$index
      -command {
         set temp select$index
         if {1 == $temp} {
            puts "write is on"
         } else {
            puts "write is off"
         }
      }
}

대략 이런 식으로 구현하면, $index의 값이 생성된 모든 checkbutton에 대해 항상 indexlist의 마지막 값으로 고정되어 쓸모가 없게 됩니다.

각각의 checkbutton에 대해 해당 $index의 값으로 설정될 수 있도록 하는 방법은 없을까요?

너무 기본적인 질문이라면 죄송하고요, 답변 미리 감사드립니다 꾸벅. (__)