Question

我想在下面的Slider控件中为变量z添加字体样式。在此玩具操纵示例中，当用户更换SetterBar或Slider值时，y滑块将重置为y = 0.1。当然我可以用行[{Style [“Z”，Bold]，{z，Slider ....}]包装z Slider控件，但是我需要以某种方式抑制z的外观。提前感谢您的帮助。

布赖恩

Manipulate[
Module[{}, {x, y, z}], {x, 
SetterBar[Dynamic[x, (x = #; y = 0.1) &], {"A", "B", "C"}] &}, {z, 
Slider[Dynamic[z, (z = #; y = 0.1) &], {.1, 10}, 
Appearance -> "Labeled"] &},
{{y, 0.1, Style["Y", 14]}, 0.1, 5, Appearance -> "Labeled"}, 
Initialization :> ({x, z} = {"B", 1})]

Answer 1

执行我认为您要求的最简单的方法是使用您已在{{u, uinit, ulbl}, ...}的规范表单中使用的y控件规范表单。例如：

Manipulate[
 Module[{}, {x, y, z}],
 {x, SetterBar[Dynamic[x, (x = #; y = 0.1) &], {"A", "B", "C"}] &},
 {{z, .1, Style["Z", Darker@Green, Bold, 16, FontFamily -> Times]}, 
  Slider[Dynamic[z, (z = #; y = 0.1) &], {.1, 10}, 
    Appearance -> "Labeled"] &},
 {{y, 0.1, Style["Y", 14]}, 0.1, 5, Appearance -> "Labeled"},
 Initialization :> ({x, z} = {"B", 1})]

如果您想避免这种情况，这不需要对表达式进行太多重组......

在Mathematica的Manipulate函数中为Slider控件添加样式

1 个答案: