MenuEditor.st
changeset 1999 f2b8044ff678
parent 1997 646225e1e5bf
child 2003 d32a3742144b
equal deleted inserted replaced
1998:efd9be2585e3 1999:f2b8044ff678
   506         window: 
   506         window: 
   507        (WindowSpec
   507        (WindowSpec
   508           label: 'Menu Editor'
   508           label: 'Menu Editor'
   509           name: 'Menu Editor'
   509           name: 'Menu Editor'
   510           min: (Point 550 385)
   510           min: (Point 550 385)
   511           bounds: (Rectangle 12 22 588 497)
   511           bounds: (Rectangle 0 0 576 475)
   512           menu: menu
   512           menu: menu
   513           returnIsOKInDialog: false
   513           returnIsOKInDialog: false
   514           escapeIsCancelInDialog: false
   514           escapeIsCancelInDialog: false
   515         )
   515         )
   516         component: 
   516         component: 
   522               tabable: true
   522               tabable: true
   523               menu: toolbar
   523               menu: toolbar
   524               showSeparatingLines: true
   524               showSeparatingLines: true
   525             )
   525             )
   526            (VariableHorizontalPanelSpec
   526            (VariableHorizontalPanelSpec
   527               name: 'horizontalPanel'
   527               name: 'mainPanel'
   528               layout: (LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
   528               layout: (LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
   529               component: 
   529               component: 
   530              (SpecCollection
   530              (SpecCollection
   531                 collection: (
   531                 collection: (
   532                  (HierarchicalListViewSpec
   532                  (HierarchicalListViewSpec
   545                     selectConditionSelector: canSelect:
   545                     selectConditionSelector: canSelect:
   546                     showLeftIndicators: false
   546                     showLeftIndicators: false
   547                     indicatorSelector: indicatorClickedAt:
   547                     indicatorSelector: indicatorClickedAt:
   548                     properties: 
   548                     properties: 
   549                    (PropertyListDictionary
   549                    (PropertyListDictionary
   550                       enterSelector: dropEnter:
   550                       dropSelector: doDrop:
   551                       dragArgument: nil
   551                       dragArgument: nil
   552                       dropObjectSelector: dropObjects
   552                       dropObjectSelector: dropObjects
   553                       overSelector: dropOver:
   553                       overSelector: dropOver:
   554                       dropArgument: nil
   554                       dropArgument: nil
   555                       canDropSelector: canDrop:
   555                       canDropSelector: canDrop:
       
   556                       enterSelector: dropEnter:
   556                       leaveSelector: dropLeave:
   557                       leaveSelector: dropLeave:
   557                       dropSelector: doDrop:
       
   558                     )
   558                     )
   559                     postBuildCallback: postBuildListOfItemsView:
   559                     postBuildCallback: postBuildListOfItemsView:
   560                   )
   560                   )
   561                  (ViewSpec
   561                  (ViewSpec
   562                     name: 'Box'
   562                     name: 'Box'
  2153         (builder componentAt:'okButton') label:(resources string:'Apply')
  2153         (builder componentAt:'okButton') label:(resources string:'Apply')
  2154     ].
  2154     ].
  2155 
  2155 
  2156     "/ using masters infoHolder ?
  2156     "/ using masters infoHolder ?
  2157     (builder aspectAt:#useAlienInfoLabelHolder) == true ifTrue:[
  2157     (builder aspectAt:#useAlienInfoLabelHolder) == true ifTrue:[
  2158         (builder componentAt:#horizontalPanel) layout bottomOffset:0.
  2158         (builder componentAt:#mainPanel) layout bottomOffset:0.
  2159         (builder componentAt:#infoBarSubSpec) beInvisible
  2159         (builder componentAt:#infoBarSubSpec) beInvisible
  2160     ]
  2160     ]
  2161 !
  2161 !
  2162 
  2162 
  2163 initialize
  2163 initialize