You are here

text 내용 지우기.

어떠한 파일을 읽어서 버튼을 누르면 텍스트 창에 보이도록 만들었습니다.
그런데 하다보니 읽힌 값이 버튼이 눌릴때마다 계속 누적되네요.
text 에 써진 값이 지워지도록 하려면 어떻게 해야하나요?
제가 작성한 코드는 아래와 같습니다.

pack [button $main.sub3.perfect.bu.c_t_b -text "C T" -command {
        set read_ct [open CT.dat r]
        while {[gets $read_ct line] >= 0} {
                set ab $line
                update
        }
        close $read_ct

        $main.sub3.perfect.bu.c_t insert end ${ab}n
        $main.sub3.perfect.bu.c_t see end}]
pack [text $main.sub3.perfect.bu.c_t -width 12 -height 2]