Tk Text 小部件 - 以行和字符获取新大小

Question

当您创建 Tk Text 小部件时，您可以将其大小指定为 -height 和 -width，以默认字体的行和字符测量。

如果稍后调整小部件的大小，我想以行和字符的形式读取新大小，但我不知道如何。我根本没有改变字体。绑定到<Configure> 事件将在 %h 和 %w 中以像素为单位报告新大小。执行cget -height 或cget -width 只会报告最初配置的行和字符大小。有没有办法检测行和字符的新大小？

Answer 1

您可以以像素为单位进行宽度估算：

set width [expr {round($pwidth/[font measure TkTextFont 0])}]

高度类似于：

set height [expr {round($pheight/[font metrics TkTextFont -linespace])}]

用实际使用的字体替换TkTextFont。