如何控制 Mathematica Manipulate 语句中定位器的外观？

Question

如果我有 Manipulate 语句，例如：

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

如何以最简单的方式更改 Locator 对象的外观可能的？我必须诉诸动态语句吗？具体来说，我想让定位器不可见。

Answer 1

除了WReach 的回答：在正常的 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}]

我认为这没有记录。去年我尝试找出如何做到这一点，但找不到方法。我在matheca 新闻组也可以。

Answer 2

尝试添加 Appearance ->定位器控件无：

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