水平滚动条不起作用

Question

我是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：

Answer 1

如果将文本窗口小部件设置为包装文本中的行（默认情况下它是这样），则文本窗口小部件将不会使用水平滚动条。要禁用包装，请使用

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

文档：text