0

tkx 是否具有等效的 tagConfigure 以及更改文本小部件上文本颜色的方法?

我有一个多年前基于 perl tk 创建的工具,我正在尝试使用 ActivePerl 5.x 及更高版本将其转换为 tkx。我已经取得了进展,但我很难过的项目之一是更改文本小部件中的字体颜色。对于 tk,我使用了 tagConfigure。$txt->tagConfigure('normal', -font=>"Arial 10", -foreground=>"white"); $txt->tagConfigure('bold', -font=>"Arial 10 粗体", -foreground=>"white"); $txt->tagConfigure('FC1', -font=>"Arial 10", -foreground=>"orange"); …… 然后我使用插入函数将文本附加到我想要的颜色。$txt->insert('end',$TEXT,$COLOR); tkx 似乎使用“$txt->insert_end($TEXT);”,但它似乎不允许您更改颜色。

4

1 回答 1

0

我终于找到了答案。这是 tkx 的正确语法: $txt->tag_configure('FC7', -font=>"Arial 10", -foreground=>"black", -background=>"white"); $txt->insert_end("我的消息\n", "FC7");

于 2013-04-12T13:21:29.147 回答