Имеет ли tkx эквивалент tagConfigure и способ изменить цвета текста в текстовом виджете?
Имеет ли tkx эквивалент tagConfigure и способ изменить цвета текста в текстовом виджете?
У меня есть инструмент, который я создал несколько лет назад на основе perl tk, который я пытаюсь преобразовать в tkx, используя ActivePerl 5.x и выше. Я добился прогресса, но один из пунктов, на котором я остановился, - это изменение цвета шрифта в текстовом виджете. С тк я использовал 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");.... Затем я использовал функцию вставки, чтобы добавить текст нужным цветом. $ Txt-> вставить ('конец',$TEXT,$COLOR); Похоже, что tkx использует "$txt->insert_end($TEXT);", но это не позволяет вам изменять цвета.
1 ответ
Я наконец нашел ответ. Это правильный синтаксис для tkx: $txt->tag_configure('FC7', -font=>"Arial 10", -foreground=>"black", -background=>"white"); $txt->insert_end("Мое сообщение \n", "FC7");