Wolfram mathematica 使用Mathematica中的“操纵”使用鼠标移动对象

我想创建一个小游戏，用户只需用鼠标移动一些图像来创建一些形状

我在Karl Scherer的演示中发现了这种可能性

然而，查看源代码时，我无法找出哪一部分能够用鼠标操纵形状

---

操纵中的最后一条控制语句是

{{pts, {{2, 1.5}, ..., {16.1, 16.1}}}, Locator, Appearance -> None},

这将使每个多边形的中心不可见。 正是这些被鼠标拾取和移动

上述控件创建2个弹出菜单和19个旋转滑块

---

编辑：要处理注释，请使用插入的

示例：

g[1]=ExampleData[{"TestImage","Girl"}];
g[2]=ExampleData[{"TestImage","Girl2"}];
g[3]=ExampleData[{"TestImage","Girl3"}];
Manipulate[Plot[Cos[x^n],{x,0,4Pi},
    Epilog->Table[Inset[g[i],pos[[i]],{0,0},ImageScaled[{.2,.2}]],{i,3}]],
  {{n, 1}, 0, 4},
  {{pos,{{0,0},{Pi,0},{2Pi,0}}},Locator,Appearance->None}]


奖励点：在“TestImage”示例数据中命名“Girl”…
例如，此

Manipulate[Graphics[Disk[p, .2], PlotRange \[Rule] {{0, 10}, {0, 10}}],
   {{p, {.2, 1.5}}, Locator, Appearance \[Rule] None}]

显示一个圆；当你点击某个地方时，圆圈就会跳到那里。这回答了问题吗？
谢谢！有没有一种方法可以在没有图形的情况下操纵图像？图像似乎不是一个图形原语…@500是的，西蒙描述的方式。也许会发布你的问题的玩具版本？是的，我会发布web.mathematica或通过演示项目，只要我有合适的东西要展示，希望尽快@500不，我的意思是一些真正缩小了的东西，以便有人可以明确地告诉你如何使用图像定位器对象。我现在使用的是你的和Simon的答案，成功了，它工作了！非常感谢你的解释，现在它有意义了。你知道我能不能用图像定位器。图像不是图形原语？@500:您必须使用将图像定位到
图形中。
Inset
的位置可以像任何其他图形对象一样附加到
定位器上。我放弃了，因为我需要工作，但我确信解决方案就在这里：或者这里；）好的，我相信我已经浏览了这两个链接，但没有成功：（她是谁！？）！？