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

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

我已尝试使用此代码：

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

请注意，-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 .b1 -text Enable -command {.e1 configure -state normal}
pack .b1 -in .workArea -side left