ResourceSelectionBrowser.st
changeset 1751 fd6ac12ed9e4
parent 1732 f6fb9ac10ac5
child 1835 c6b3c9ee5207
equal deleted inserted replaced
1750:f175cc37a17a 1751:fd6ac12ed9e4
   261     "
   261     "
   262 
   262 
   263     <resource: #canvas>
   263     <resource: #canvas>
   264 
   264 
   265     ^ 
   265     ^ 
   266      #(#FullSpec
   266      #(FullSpec
   267         #name: #windowSpec
   267         name: windowSpec
   268         #window: 
   268         window: 
   269        #(#WindowSpec
   269        (WindowSpec
   270           #label: 'Resource Selection Browser'
   270           label: 'Resource Selection Browser'
   271           #name: 'Resource Selection Browser'
   271           name: 'Resource Selection Browser'
   272           #min: #(#Point 400 300)
   272           min: (Point 400 300)
   273           #max: #(#Point 1152 864)
   273           max: (Point 1152 864)
   274           #bounds: #(#Rectangle 145 206 745 556)
   274           bounds: (Rectangle 12 22 612 372)
   275         )
   275         )
   276         #component: 
   276         component: 
   277        #(#SpecCollection
   277        (SpecCollection
   278           #collection: #(
   278           collection: (
   279            #(#VariableHorizontalPanelSpec
   279            (VariableHorizontalPanelSpec
   280               #name: 'VariableHorizontalPanel'
   280               name: 'VariableHorizontalPanel'
   281               #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -36 1.0)
   281               layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 -36 1.0)
   282               #component: 
   282               component: 
   283              #(#SpecCollection
   283              (SpecCollection
   284                 #collection: #(
   284                 collection: (
   285                  #(#ViewSpec
   285                  (ViewSpec
   286                     #name: 'Box1'
   286                     name: 'Box1'
   287                     #component: 
   287                     component: 
   288                    #(#SpecCollection
   288                    (SpecCollection
   289                       #collection: #(
   289                       collection: (
   290                        #(#HorizontalPanelViewSpec
   290                        (HorizontalPanelViewSpec
   291                           #name: 'HorizontalPanel2'
   291                           name: 'HorizontalPanel2'
   292                           #layout: #(#LayoutFrame 0 0 2 0 297 0 23 0)
   292                           layout: (LayoutFrame 0 0 2 0 297 0 23 0)
   293                           #horizontalLayout: #leftSpace
   293                           horizontalLayout: leftSpace
   294                           #verticalLayout: #fit
   294                           verticalLayout: fit
   295                           #horizontalSpace: 3
   295                           horizontalSpace: 3
   296                           #verticalSpace: 3
   296                           verticalSpace: 3
   297                           #component: 
   297                           component: 
   298                          #(#SpecCollection
   298                          (SpecCollection
   299                             #collection: #(
   299                             collection: (
   300                              #(#RadioButtonSpec
   300                              (RadioButtonSpec
   301                                 #label: 'Categories'
   301                                 label: 'Categories'
   302                                 #name: 'ClassCategoriesRadioButton'
   302                                 name: 'ClassCategoriesRadioButton'
   303                                 #translateLabel: true
   303                                 translateLabel: true
   304                                 #model: #selectionOfClassPresentation
   304                                 model: selectionOfClassPresentation
   305                                 #isTriggerOnDown: true
   305                                 isTriggerOnDown: true
   306                                 #lampColor: #(#Color 0.0 0.0 0.0)
   306                                 lampColor: (Color 0.0 0.0 0.0)
   307                                 #select: #'Class Categories'
   307                                 select: #'Class Categories'
   308                                 #extent: #(#Point 124 21)
   308                                 extent: (Point 124 21)
   309                               )
   309                               )
   310                              #(#RadioButtonSpec
   310                              (RadioButtonSpec
   311                                 #label: 'Hierarchy'
   311                                 label: 'Hierarchy'
   312                                 #name: 'ClassHierarchyRadioButton'
   312                                 name: 'ClassHierarchyRadioButton'
   313                                 #translateLabel: true
   313                                 translateLabel: true
   314                                 #model: #selectionOfClassPresentation
   314                                 model: selectionOfClassPresentation
   315                                 #isTriggerOnDown: true
   315                                 isTriggerOnDown: true
   316                                 #lampColor: #(#Color 0.0 0.0 0.0)
   316                                 lampColor: (Color 0.0 0.0 0.0)
   317                                 #select: #'Class Hierarchy'
   317                                 select: #'Class Hierarchy'
   318                                 #extent: #(#Point 145 21)
   318                                 extent: (Point 145 21)
   319                               )
   319                               )
   320                              )
   320                              )
   321                            
   321                            
   322                           )
   322                           )
   323                         )
   323                         )
   324                        #(#SelectionInTreeViewSpec
   324                        (SelectionInTreeViewSpec
   325                           #name: 'listOfClassHierarchyView'
   325                           name: 'listOfClassHierarchyView'
   326                           #layout: #(#LayoutFrame 0 0.0 23 0.0 0 1.0 -24 1.0)
   326                           layout: (LayoutFrame 0 0.0 23 0.0 0 1.0 -24 1.0)
   327                           #tabable: true
   327                           tabable: true
   328                           #model: #selectionOfClassHierarchy
   328                           model: selectionOfClassHierarchy
   329                           #hasHorizontalScrollBar: true
   329                           hasHorizontalScrollBar: true
   330                           #hasVerticalScrollBar: true
   330                           hasVerticalScrollBar: true
   331                           #miniScrollerHorizontal: true
   331                           miniScrollerHorizontal: true
   332                           #showDirectoryIndicatorForRoot: false
   332                           showDirectoryIndicatorForRoot: false
   333                           #showDirectoryIndicator: true
   333                           showDirectoryIndicator: true
   334                           #valueChangeSelector: #classSelected
   334                           valueChangeSelector: classSelected
   335                           #hierarchicalList: #rootOfClassHierarchy
   335                           hierarchicalList: rootOfClassHierarchy
   336                           #validateDoubleClickSelector: #validateDoubleClick:
   336                           validateDoubleClickSelector: validateDoubleClick:
   337                           #contentsSelector: #treeViewClassHierarchyContents
   337                           contentsSelector: treeViewClassHierarchyContents
   338                           #labelSelector: #treeViewClassHierarchyLabel
   338                           labelSelector: treeViewClassHierarchyLabel
   339                           #childrenSelector: #treeViewClassHierarchyChildren
   339                           childrenSelector: treeViewClassHierarchyChildren
   340                           #iconSelector: #treeViewClassHierarchyIcon
   340                           iconSelector: treeViewClassHierarchyIcon
   341                           #highlightMode: #line
   341                           highlightMode: line
   342                         )
   342                         )
   343                        #(#SelectionInTreeViewSpec
   343                        (SelectionInTreeViewSpec
   344                           #name: 'listOfClassCategoriesView'
   344                           name: 'listOfClassCategoriesView'
   345                           #layout: #(#LayoutFrame 0 0.0 23 0.0 0 1.0 -24 1.0)
   345                           layout: (LayoutFrame 0 0.0 23 0.0 0 1.0 -24 1.0)
   346                           #tabable: true
   346                           tabable: true
   347                           #model: #selectionOfClassCategories
   347                           model: selectionOfClassCategories
   348                           #hasHorizontalScrollBar: true
   348                           hasHorizontalScrollBar: true
   349                           #hasVerticalScrollBar: true
   349                           hasVerticalScrollBar: true
   350                           #miniScrollerHorizontal: true
   350                           miniScrollerHorizontal: true
   351                           #showRoot: false
   351                           showRoot: false
   352                           #showDirectoryIndicator: true
   352                           showDirectoryIndicator: true
   353                           #valueChangeSelector: #classSelected
   353                           valueChangeSelector: classSelected
   354                           #hierarchicalList: #rootOfClassCategories
   354                           hierarchicalList: rootOfClassCategories
   355                           #validateDoubleClickSelector: #validateDoubleClick:
   355                           validateDoubleClickSelector: validateDoubleClick:
   356                           #childrenSelector: #treeViewClassCategoryChildren
   356                           childrenSelector: treeViewClassCategoryChildren
   357                           #iconSelector: #treeViewClassCategoryIcon
   357                           iconSelector: treeViewClassCategoryIcon
   358                           #highlightMode: #line
   358                           highlightMode: line
   359                         )
   359                         )
   360                        #(#InputFieldSpec
   360                        (InputFieldSpec
   361                           #name: 'classNameInputField'
   361                           name: 'classNameInputField'
   362                           #layout: #(#LayoutFrame 2 0.0 -22 1 -1 1.0 0 1)
   362                           layout: (LayoutFrame 2 0.0 -22 1 -1 1.0 0 1)
   363                           #tabable: true
   363                           tabable: true
   364                           #model: #valueOfClassName
   364                           model: valueOfClassName
   365                           #acceptOnLeave: true
   365                           acceptOnLeave: true
   366                           #acceptOnLostFocus: true
   366                           acceptOnLostFocus: true
   367                           #acceptOnPointerLeave: true
   367                           acceptOnPointerLeave: true
   368                         )
   368                         )
   369                        )
   369                        )
   370                      
   370                      
   371                     )
   371                     )
   372                   )
   372                   )
   373                  #(#ViewSpec
   373                  (ViewSpec
   374                     #name: 'Box2'
   374                     name: 'Box2'
   375                     #component: 
   375                     component: 
   376                    #(#SpecCollection
   376                    (SpecCollection
   377                       #collection: #(
   377                       collection: (
   378                        #(#DataSetSpec
   378                        (DataSetSpec
   379                           #name: 'resourcesDataSetView'
   379                           name: 'resourcesDataSetView'
   380                           #layout: #(#LayoutFrame 2 0.0 2 0.0 -2 1.0 -24 1.0)
   380                           layout: (LayoutFrame 2 0.0 2 0.0 -2 1.0 -24 1.0)
   381                           #model: #selectionOfResourceMethod
   381                           model: selectionOfResourceMethod
   382                           #hasHorizontalScrollBar: true
   382                           hasHorizontalScrollBar: true
   383                           #hasVerticalScrollBar: true
   383                           hasVerticalScrollBar: true
   384                           #miniScrollerHorizontal: true
   384                           miniScrollerHorizontal: true
   385                           #rowClassName: 'ResourceSelectionBrowser::Row'
   385                           rowClassName: 'ResourceSelectionBrowser::Row'
   386                           #dataList: #listOfResourceMethods
   386                           dataList: listOfResourceMethods
   387                           #useIndex: false
   387                           useIndex: false
   388                           #has3Dsepartors: true
   388                           has3Dsepartors: true
   389                           #has3Dseparators: true
   389                           has3Dseparators: true
   390                           #doubleClickSelector: #resourceDoubleClicked
   390                           doubleClickSelector: resourceDoubleClicked
   391                           #columnHolder: #resourceMethodColumns
   391                           columnHolder: resourceMethodColumns
   392                           #valueChangeSelector: #resourceSelected
   392                           valueChangeSelector: resourceSelected
   393                           #verticalSpacing: 1
   393                           verticalSpacing: 1
   394                         )
   394                         )
   395                        #(#InputFieldSpec
   395                        (InputFieldSpec
   396                           #name: 'selectorInputField'
   396                           name: 'selectorInputField'
   397                           #layout: #(#LayoutFrame 2 0.0 -22 1 -2 1.0 0 1)
   397                           layout: (LayoutFrame 2 0.0 -22 1 -2 1.0 0 1)
   398                           #tabable: true
   398                           tabable: true
   399                           #model: #valueOfResourceSelector
   399                           model: valueOfResourceSelector
   400                           #acceptOnLeave: true
   400                           acceptOnLeave: true
   401                           #acceptOnLostFocus: true
   401                           acceptOnLostFocus: true
   402                           #acceptOnPointerLeave: true
   402                           acceptOnPointerLeave: true
   403                         )
   403                         )
   404                        )
   404                        )
   405                      
   405                      
   406                     )
   406                     )
   407                   )
   407                   )
   408                  )
   408                  )
   409                
   409                
   410               )
   410               )
   411               #handles: #(#Any 0.5 1.0)
   411               handles: (Any 0.5 1.0)
   412             )
   412             )
   413            #(#HorizontalPanelViewSpec
   413            (HorizontalPanelViewSpec
   414               #name: 'HorizontalPanel1'
   414               name: 'ButtonPanel'
   415               #layout: #(#LayoutFrame 2 0.0 -30 1 -2 1.0 -4 1.0)
   415               layout: (LayoutFrame 2 0.0 -30 1 -2 1.0 -4 1.0)
   416               #horizontalLayout: #fit
   416               horizontalLayout: fit
   417               #verticalLayout: #fit
   417               verticalLayout: fit
   418               #component: 
   418               reverseOrderIfOKAtLeft: true
   419              #(#SpecCollection
   419               component: 
   420                 #collection: #(
   420              (SpecCollection
   421                  #(#ActionButtonSpec
   421                 collection: (
   422                     #label: 'Help'
   422                  (ActionButtonSpec
   423                     #name: 'HelpButton'
   423                     label: 'Help'
   424                     #activeHelpKey: #dss
   424                     name: 'HelpButton'
   425                     #model: #openHTMLDocument:
   425                     activeHelpKey: dss
   426                     #initiallyDisabled: true
   426                     model: openHTMLDocument:
   427                     #enableChannel: #helpEnabled
   427                     initiallyDisabled: true
   428                     #actionValue: 'tools/uipainter/ResourceSelectionBrowser.html'
   428                     enableChannel: helpEnabled
   429                     #extent: #(#Point 196 26)
   429                     actionValue: 'tools/uipainter/ResourceSelectionBrowser.html'
       
   430                     extent: (Point 196 26)
   430                   )
   431                   )
   431                  #(#ActionButtonSpec
   432                  (ActionButtonSpec
   432                     #label: 'Cancel'
   433                     label: 'Cancel'
   433                     #name: 'cancelButton'
   434                     name: 'cancelButton'
   434                     #activeHelpKey: #commitCancel
   435                     activeHelpKey: commitCancel
   435                     #tabable: true
   436                     tabable: true
   436                     #model: #cancel
   437                     model: cancel
   437                     #extent: #(#Point 196 26)
   438                     extent: (Point 197 26)
   438                   )
   439                   )
   439                  #(#ActionButtonSpec
   440                  (ActionButtonSpec
   440                     #label: 'OK'
   441                     label: 'OK'
   441                     #name: 'okButton'
   442                     name: 'okButton'
   442                     #activeHelpKey: #commitOK
   443                     activeHelpKey: commitOK
   443                     #tabable: true
   444                     tabable: true
   444                     #model: #accept
   445                     model: accept
   445                     #isDefault: true
   446                     isDefault: true
   446                     #extent: #(#Point 196 24)
   447                     extent: (Point 197 26)
   447                   )
   448                   )
   448                  )
   449                  )
   449                
   450                
   450               )
   451               )
   451             )
   452             )