带有一些默认文本的 tcl 条目

tcl entry with some default text

我想要一个在框中显示一些默认文本的条目小部件。 -状态禁用。当我点击编辑按钮时,它将被启用并且我可以更改文本。我可以管理“编辑”按钮部分,只需要有关输入小部件的帮助。

我试过这个代码:

entry .e1 -text "abcd" -state disable
pack .e1 -in .WorkArea -side left
frame .workArea
pack .workArea

请注意,-text 选项是 -textvariable 的缩写,即包含输入到条目小部件中的文本的全局变量的名称。将该变量设置为一个值会为该条目提供一些文本。

entry .e1 -textvariable abcd -state disabled
set abcd wxyz
pack .e1 -in .workArea -side left

您现在需要一个按钮,将输入小部件配置为在按下时正常(启用):

button .b1 -text Enable -command {.e1 configure -state normal}
pack .b1 -in .workArea -side left

文档: button (widget), entry, frame (widget), pack, set