pharo - 将菜单添加到 ListModel

Question

如何将菜单添加到具有适当操作的列表模型中？

我见过这样的代码:

list menu: [ :menu |
  menu
    add: 'Name'
    action: [ "some action" ].

但是当我这样做时我得到一个错误，因为 block 没有被评估而是作为消息发送给其他东西......

是否有任何菜单指南？

Answer 1

菜单已重做。

现在你应该做类似的事情

list menu: [ :menu | aMenu addGroup: [:aGroup |
    aGroup addItem: [ :item |
        item
            name: 'Inspect' translated;
            action: [ self inspectSelectedObjectInNewWindow ];
            shortcut: $i command mac | $i alt win | $i alt unix ].
    aGroup addItem: [ :item |
        item
            name: 'Explore' translated;
            action: [ self exploreSelectedObject ];
            shortcut: $i shift command mac | $i shift alt win | $i shift alt unix ] ].

HTH,

本杰明·范瑞塞格姆

#

编辑:ListModel 仍在使用旧菜单(出于 Pharo 3.0 中的兼容性原因)。一个工作示例是

ListModel new
    menu: [:m | 
        m 
            add: 'test' 
            target: [self halt ] 
            action: #value. 
        m ];
    openWithSpec

请注意，菜单 block 应返回菜单(应封装 PluggableListMorph 的限制)