squeak - Squeak 中的上下文菜单

Question

我正在使用 Squeak（不能使用 Pharo），并且我有一个 Morphic 应用程序，我希望添加我自己的自定义上下文菜单（我不想添加或使用 Halo 菜单）。

如何构建我的菜单并使其在右键单击时出现（yellowButton, sigh ）？

我目前有一个 CustomMenu 和一个 handlerForYellowButtonDown: 调用菜单启动。菜单显示，但单击其中一个选项没有任何效果。非常感谢任何帮助或链接，谢谢！

代码片段：

初始化
...
contextMenu := CustomMenu 新标题：“上下文测试菜单”。
contextMenu 添加：“清除 - 擦除所有内容！” 行动：#menuStub。
上下文菜单添加行。
contextMenu 添加：“执行操作”操作：#menuStub:。

handlerForYellowButtonDown：事件
记录显示：'yellowHandler'；
显示：字符cr。
上下文菜单启动

menuStub
成绩单显示：'menuStub';
显示：字符 cr

menuStub: something
Transcript show: 'menuStub: something';
显示：字符 cr

Answer 1

#invokeOn: 方法可用于指定目标：

menu := CustomMenu new.
menu add: 'make sound' action: #beep.
menu invokeOn: Beeper.