如何在tcltk中更改标签的文本字体

Question

我有一个带有标签和按钮的GUI。当我按下按钮时出现一个新窗口，我必须选择字体。这部分我设法做到了。

在tcltk帮助网站上，一个代码巫婆帮我制作了字体窗口。显示了4个程序。我用于字体窗口外观的第一个和第二个proc。链接是：http://www.tcl.tk/man/tcl/TkCmd/fontchooser.htm

我的问题是：如何将我选择的字体与标签文字相关联？

Answer 1

标签小部件与文本小部件一样，具有-font选项。你所要做的就是让自己做好准备。在这种情况下的方法是添加以下绑定（假设您已经获得了程序并已经制作了标签，几何管理它，并将其名称存储在thelabel变量中）：

bind $thelabel <1> {focus %W; fontchooserFocus %W}

标签通常不需要关注，也没有任何默认的键绑定，但 可能会被迫拥有焦点，这对于指示非常有用什么是配置。 （这在OSX上尤为重要，因为字体对话框在其他平台上的工作方式非常不同。）