水平滚动条不起作用

问题描述:

我是新来的tcl/tk,我尝试创建一个包含textarea和两个滚动条(垂直和水平)的接口 我们的问题是,我可以看到水平滚动条,但未启用水平滚动条不起作用

代码:

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谢谢 –

如果文本小部件设置为包装文本中的行(默认情况下),它将不会使用水平滚动条。要禁用包装,使用

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

文档:text

+0

它将使用滚动条,但可滚动区域的宽度将默认为可查看区域的宽度,所以滚动条应始终覆盖范围0-100%。嵌入式图像和小部件可以强制事物。 –