將樣式添加到Mathematica的Manipulate函數中的滑塊控件

Question

我想在下面的Slider控件中爲變量z添加字體樣式。在此玩具操作示例中，當用戶更改SetterBar或Slider值時，y滑塊重置爲y = 0.1。當然，我可以用Row [{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

做的是與你的規範形式已經用於y的{{u, uinit, ulbl}, ...}控制規範的形式，我認爲你問什麼最簡單的方法。例如：

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})] 

這並不需要你表達的重組多，如果你想避免這種情況...