风格动态值

500*_*500 7 wolfram-mathematica mathematica-8

我可以将Style应用于下面"Labeled"的输出吗?

Manipulate[\[Lambda],
Control@{{\[Lambda], 401,
Style["     \[Lambda]", Black, Bold, 24]},
Range[401, 570, 1],
ControlType -> Slider,
ControlPlacement -> Bottom,
Appearance -> "Labeled",
ImageSize -> 200}]
Run Code Online (Sandbox Code Playgroud)

这是滑块的右侧部分:

在此输入图像描述

Sim*_*mon 10

你想要的选项BaseStyle(出现在Options[Slider]).例如

Manipulate[
 Plot[Cos[k x], {x, 0, 2 Pi}, PlotLabel -> "Cosine"], 
 {{k, 1, Style["x", Black, Bold, 24]}, 0, 4, 
  ControlType -> Slider, Appearance -> "Labeled", 
  ControlPlacement -> Bottom, ImageSize -> 200, 
  BaseStyle -> {Red, Large, Italic, FontFamily -> "Times"}}]
Run Code Online (Sandbox Code Playgroud)

余弦

当我看到这个时,我注意到你也可以使用几乎没有文档的 ControlType -> LabeledSlider,只是为了不同的东西.