2016-05-30 5 views
0

Я новичок в tcl/tk, и я пытаюсь создать интерфейс, содержащий текстовое поле и две полосы прокрутки (по вертикали и по горизонтали) . Наша проблема в том, что я вижу горизонтальную полосу прокрутки, но она не включенаГоризонтальная полоса прокрутки не работает

код:

frame .textarea 

label .textarea.l -text "Text" 
text .textarea.txt -width 70 -height 20 -xscroll {.textarea.h set} -yscroll {.textarea.v set} 
scrollbar .textarea.v -orient vertical -command {.textarea.txt yview} 
scrollbar .textarea.h -orient horizontal -command {.textarea.txt xview} 


grid .textarea.l -sticky nsew 
grid .textarea.txt .textarea.v -sticky nsew 
grid .textarea.h  -sticky nsew 

grid rowconfigure .textarea .textarea.txt -weight 1 
grid columnconfigure .textarea .textarea.txt -weight 1 

pack .textarea -side left 

PrintScreen:

enter image description here

+1

Используйте опцию -wrap ни с текстовым виджетом. –

+0

@Peter Lewerin спасибо –

ответ

1

Текстовый виджет не будет использовать горизонтальную полосу прокрутки, если она настроена на перенос строк в тексте (по умолчанию это делается). Для того, чтобы отключить упаковку, используйте

text $path ... -wrap none ... 

Документацию: text

+0

Это будет _use_ полоса прокрутки, но ширина прокручиваемой области по умолчанию будет равна ширине видимой области, поэтому полоса прокрутки всегда должна охватывать диапазон 0-100%. Встроенные изображения и виджеты могут заставить вещи. –

Смежные вопросы