Wolfram mathematica 如何添加元素'；显示动画控件'；直接（不使用操纵控制设置）？

我无法找到如何执行以下操作。使用“操纵”时，它会在控件末尾自动显示一点“+”，如下所示

Manipulate[x,
 {{x, 0, "x"}, 0, 1, .1, Appearance -> "Labeled"}
 ]

现在，我想自己直接使用Dynamic设置控件，并使其看起来与上面一样，如下所示：（顺便说一句，感谢Simon展示了正确的语法来完成此操作

现在，唯一缺少的是小“+”。我不能在上面使用AppearanceElement选项。所以，接下来我尝试了这个

Manipulate[x,
 {{xChanged, False}, None},

 Grid[{
   {"x ", 
    Animator[Dynamic[x, (x = #; xChanged = True; #) &], {0, 1, .1}, 
     AnimationRunning -> False], Spacer[2],
    Dynamic@x
    }
   }, Frame -> None, Spacings -> {0.2, 0.1}, Alignment -> Center]

 ]

但这太多了。在使用“操纵”时，我只需要标记为“显示动画控件”的“+”。但我找不到与此元素匹配的元素

奇怪的是，很难找到这些元素的名称。我去了

ref/AppearanceElements

，它甚至没有列出这些名称。当我去

ref/operate

时，它在外观元素选项

下提到了以下元素：{“HideControlButton”、“SnapshotButton”、“ResetButton”、“UpdateButton”

我都试过了，但它们不是我想要的

我去了ref/操纵器，看到了这些

“InputField”、“StepLeftButton”、“PlayPauseButton”、“StepRightButton”、“FasterSlowerButtons”、“DirectionButton”、“InlineInputField”。

但没有一个是“Show animation controls”（显示动画控件）

有人知道如何获取“+”元素吗

（奇怪的是，这些元素没有全部列在一个地方，在ref/AppearanceElements中）

---

谢谢，

您有什么理由不能使用

操纵器吗

Manipulate[x, {{xChanged, False}, None}, {x, None}, 
 Grid[{{"x ", 
    Manipulator[
     Dynamic[x, (x = #; xChanged = True; #) &], {0, 1, .1}], 
    Spacer[2], Dynamic@x}}, Frame -> None, Spacings -> {0.2, 0.1}, 
  Alignment -> Center]]

或控制：

Manipulate[x,  
   Grid[{{"test: ", Control[{x, 0, 1}], Spacer[9], Dynamic[x]}}, 
  Spacings -> {0.2, 0.1}]]

Simon又来营救了！太好了。我只是从来没有想过尝试操纵器。很久以前，我只使用过一次操纵器，没有想到它。再次感谢。顺便说一句，演示现在运行得很好，使用动力学的第二个参数在简化逻辑方面真的有很大的不同。我认为动力学的第二个参数是mos在Mathematica.secret中没有很好的保密？这里有很好的文档记录：第一个“简洁的例子”让事情变得很清楚。很遗憾，我们不能在这里要求一份机密列表（例如，Alt单击一个单元格，这是现在有文档记录的吗？或者如何有效地调试？或者编写文档？@Rolf:从来都不知道（Ctrl）-Alt-Click功能！有几个关于调试的问题和一些关于编写文档的问题，也许最好的问题应该添加到社区wiki中。@Simon，Alt-CTRL-Click功能应该是什么？它在windows 7上的V8.0.1上不起作用。不在单元格边界上，也不在单元格内部。@Rolf.Alt-Click也不起作用。ps.t关于动态第二个参数的“秘密”特征的那部分只是对我的一句开玩笑的评论，因为它有一个我需要的特征，我苦苦寻找了很长时间，却不知道，这是一个“简单”的问题知道特定操纵控制变量何时更改的方法。谢谢。谢谢你的回答。但我肯定遗漏了什么。方法是不要使用control[]或标准操纵{}控件，因为这些构造不提供在其中插入Dynamic的第二个参数的方法。需要直接使用Dynamic设置控制变量以允许使用第二个参数。谢谢。
Manipulate[x,  
   Grid[{{"test: ", Control[{x, 0, 1}], Spacer[9], Dynamic[x]}}, 
  Spacings -> {0.2, 0.1}]]