Tcl 彩色输入文本小部件

当我想在终端中输出彩色字符串（红色）时，我使用：

puts "\033\[00;31m Test String \033\[0m"

但当我在文本小部件中打印此字符串时，我得到：

[00;31m Test String [0m

---

如何在文本小部件中打印相同的彩色字符串

据我所知，这个问题是关于对文本小部件的内容应用格式的，它与Tk有关，而不是转义序列。这可以通过标签实现。下面的代码将创建一个文本小部件，在其中放入两行，并用红色突出显示第二行

set t [text .t -height 10 -width 40]
pack $t
$t insert end "text1\n"
$t insert end "text2\n"
$t tag add my_red 2.0 2.end
$t tag configure my_red -foreground red

如果问题只是关于格式，我希望这会有所帮助

---

PN

tk小部件支持的功能比终端中提供的功能多得多，并使用不同的“语言”来表达。可能的解决办法@因此，您应该提出该页面作为解决方案；看起来这是对的。@Donal Fellows:嗯，我希望在我提供解决方案之前，我们能了解更多Roman试图解决的问题，显然他想看到颜色，但为什么他试图使用终端转义来显示它们？@TokenMacGuy我有一个tcl脚本，可以将错误通知以红色打印到终端。现在我正试图基于这个脚本编写GUI前端。所以我想继续在文本小部件中以相同颜色打印错误通知。