tkx是否具有tagConfigure等效项以及在文本小部件上更改文本颜色的方法?
我有一个基于perl tk多年前创建的工具,我试图使用ActivePerl 5.x及更高版本将其转换为tkx。我已经取得了进展,但我难以理解的其中一项是改变文本小部件中的字体颜色。使用tk我使用了tagConfigure。 $ txt-> tagConfigure('normal', - font =>“Arial 10”, - foreground =>“white”); $ txt-> tagConfigure('bold', - font =>“Arial 10 bold”, - foreground =>“white”); $ txt-> tagConfigure('FC1', - font =>“Arial 10”, - foreground =>“orange”); ...。 然后我使用insert函数附加我想要的颜色的文本。 $ txt->插入(“结束” $ TEXT,$ COLOR); 似乎tkx使用“$ txt-> insert_end($ TEXT);”,但它似乎不允许您更改颜色。
答案 0 :(得分:0)
我终于找到了答案。这是tkx的正确语法: $ txt-> tag_configure('FC7', - font =>“Arial 10”, - foreground =>“black”, - background =>“white”); $ txt-> insert_end(“我的消息\ n”,“FC7”);