pharo smalltalk窗口关闭

use*_*359 3 smalltalk pharo

我正在使用Pharo Smalltalk 4.0版来构建一个简单的GUI应用程序.我希望确保当用户点击顶角的"X"按钮时,我创建的"StandardWindow"不会关闭.因此,我将消息"mustNotClose"发送到我的窗口对象,这是超类SystemWindow的实例变量.但是,当我单击"X"按钮时,窗口仍然关闭.关于我缺少什么的任何想法?任何帮助将不胜感激.

小智 5

该方法mustNotClose只是一个用于检查实例变量mustNotClose是否设置为true的访问器:

mustNotClose
    ^ mustNotClose == true
Run Code Online (Sandbox Code Playgroud)

您应该使用makeUnclosable实际删除关闭按钮的方法.然后,您可以使用添加关闭按钮makeClosable.