如何在Mathematica的Manipulate语句中控制Locator的外观？

Question

如果我有一个Manipulate语句，例如：

Manipulate[
 Graphics[Line[{{0, 0}, pt}], PlotRange -> 2], {{pt, {1, 1}}, 
  Locator}]

如何以最简单的方式更改Locator对象的外观？我是否必须采用动态声明？具体来说，我本来希望使定位器不可见。

Answer 1

除了WReach's answer之外：在正常的Locator调用中，它的外观可以作为参数之一给出。在Manipulate中使用时，这是不可能的。但是，Appearance可用于绘制其他定位符。

a = Graphics[{Red, Table[Circle[{0, 0}, i], {i, 3}]}, ImageSize -> 20];
Manipulate[
 Graphics[Line[{{0, 0}, pt}], PlotRange -> 2], {{pt, {1, 1}}, Locator,
   Appearance -> a}]

我不认为这是记录在案的。去年我试图找出如何做到这一点，但找不到办法。我对mathematica新闻组的question也没有回应。

Answer 2

尝试将Appearance -> None添加到定位器控件：

Manipulate[
  Graphics[
    Line[{{0, 0}, pt}]
  , PlotRange -> 2
  ]
, {{pt, {1, 1}}, Locator, Appearance -> None}
]