2013-01-07 28 views
1

我想列出Pharo窗口中的所有工作区窗口。当我移动单击工作区窗口时,选择的项目通常是PluggableTextMorph或TextMorphForEditView。当它是一个PluggableTextMorph时,它拥有一个TextMorphforEditView,它不会被点击选中。如何在Pharo工作区中枚举所有Workspace窗口?

检查或探索层次结构显示属于层次结构进一步向上的模型工作区的SystemWindow。

我需要什么代码来首先列出系统中的所有TextMorphforEditView(s)并查找所有权层次结构以确定SystemWindow的模型是Workspace还是Transcript?

回答

1

为了让所有的工作区,你可以简单地浏览或检查:

Workspace allInstances 

如果你有兴趣在工作区包含所有窗口,你可以探索或检查:

| listOfWindows | 

listOfWindows := Workspace allInstances collect: 
    [:eachWorkspace | eachWorkspace containingWindow]