Text Mathematica：如何使文本具有多种颜色？

我想要一个操纵控件，比如

{{wAB，1，“AB”}，0，1，外观->“标记”}

,， 但是希望

A

和

B

是不同的颜色，比如说

红色

和

蓝色

---

我可以用

样式[“AB”，红色]

更改整体颜色，但无法获得不同颜色的

A

和

B

。任何帮助都将不胜感激

如果垂直位置为x，则必须在x上打印一个字母，然后计算宽度（w），并在新位置x+=w上打印下一个字母。你的意思是这样吗

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

如果您喜欢单独定义装饰部分（这对更大、更复杂的控件很有用），并在以后的控件中引用它（比如声明一个变量，有点像，但实际上它是一个宏）并将其重新用于不同的控件，那么您可以将

与

一起使用，如下所示

Manipulate[wAB,

 Evaluate@With[

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

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

   ]
 ]

---

虽然使用

Style

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

---

是的，这正是我所需要的，太多了。我很接近，但缺少行，因此文本被截断。干杯谢谢你，巫师先生。即使不太安全，知道如何快速尝试匹配或冲突样式也是一件好事。干杯@W先生把东西涂成红色的快捷键是什么？另外，安装。它很整洁@尤达Alt-R-X-R（按顺序，而不是立即）。有了剧本，我一点也没有突出显示；默认值将被删除，并且没有任何内容替换它。我使用的是Firefox 9.。@Mr.Wizard我在Firefox中也遇到过问题，但在Chrome中效果很好。此外，该快捷方式在mac上不起作用：（嘿，我们现在扯平了-我给了你一些在你的浏览器上不起作用的东西，你给了我一些在我的机器上不起作用的东西：DHi-我建议你接受下面三个答案中的一个。这也是为了让未来的用户可以看到哪个答案实际上效果最好。