Mathematica：如何使用多种颜色的文本？

Question

我想要一个操纵控件，比如说 {{wAB, 1, "AB"}, 0, 1, Appearance -> "Labeled"}， 但我希望A和B颜色不同，比如Red和Blue。
我可以使用Style["AB",Red]更改整体颜色，但无法以不同颜色获取A和B。任何帮助将不胜感激！

Answer 1

你的意思是这样吗？

Manipulate[
 wAB,
 {{wAB,1,Row[{Style["A", Red], Style["B", Blue]}]},0,1,Appearance->"Labeled"}
 ]

如果你更喜欢单独定义装饰部分（这对于更大和更复杂的控件可能有用）并在稍后的控件中引用它（比如声明一个变量，实际上它是一个宏）并重用对于不同的控件，您可以使用With，就像这样

Manipulate[wAB,

 Evaluate@With[

   {myStyle = Row[{Style["A", Red], Style["B", Blue]}]},

   {{wAB, 1, myStyle}, 0, 1, Appearance -> "Labeled"}

   ]
 ]

Answer 2

虽然使用Style进行样式设置更安全，但您可以使用“格式”菜单或键盘快捷键直接为字符串的字符着色，而 Mathematica 会将其保留在动态控件中：

Answer 3

如果垂直位置为x，则必须在x上打印一个字母，然后计算宽度（w）并在新位置x + = w上打印另一种颜色的下一个字母。