如何在 tcl 中创建彩色字体

【问题标题】：How to create a colored font in tcl如何在 tcl 中创建彩色字体
【发布时间】：2016-06-22 09:15:13
【问题描述】：

我正在制作黑色背景的画布。这些画布上附有一些矩形和文本。我想使用文本字体的白色而不是默认的黑色。但由于字体没有使用颜色的选项，我不确定如何更改文本颜色。我正在创建这样的文本。

.c create text $i $j -text "($i,$j)" -anchor ne -font fontTEMP_varwidth

font create fontTEMP_varwidth \
   -family {comic sans ms} \
      -size -10 \
         -weight bold \
         -col
            -slant roman

【问题讨论】：

看起来它是画布上的 text 项目类型。那些支持通过-fill着色。

标签： tcl tk

【解决方案1】：

字体本身没有颜色（Tk 认为它们纯粹与字母的形状有关），但您可以设置颜色以在其他地方使用。特别是，canvas widget's text item type 支持标准的-fill 选项，这是用于呈现项目中的文本的颜色：

.c create text $i $j -text "($i,$j)" -anchor ne -font fontTEMP_varwidth -fill red

如果您使用的是文本小部件，通常会在应用于文本的标签上设置颜色以及字体。（或者您可以为整个小部件设置默认值。）

【讨论】：