pharo smalltalk窗口关闭

我正在使用Pharo Smalltalk 4.0版构建一个简单的GUI应用程序。我希望确保当用户单击上角的“X”按钮时，我创建的“StandardWindow”不会关闭。因此，我向我的窗口对象发送消息“mustNotClose”，它是超类SystemWindow的一个实例变量。但是，当我单击“X”按钮时，窗口仍然关闭。你知道我错过了什么吗？任何帮助都将不胜感激。

方法

mustNotClose

只是一个用于检查实例变量

mustNotClose

是否设置为true的访问器：

mustNotClose
    ^ mustNotClose == true

---

您应该使用实际删除关闭按钮的方法

makeUnclosable

。然后，您可以使用

makeClosable

将关闭按钮添加回原来的位置。您是对的，这很有效。非常感谢，我很感激。