MethodFinderWindow.st
changeset 2890 3d8556368fe9
parent 2889 e17b2eacfe84
child 2891 d4f1cd8626e6
equal deleted inserted replaced
2889:e17b2eacfe84 2890:3d8556368fe9
    20 "
    20 "
    21 ! !
    21 ! !
    22 
    22 
    23 !MethodFinderWindow class methodsFor:'constants'!
    23 !MethodFinderWindow class methodsFor:'constants'!
    24 
    24 
       
    25 defaultIcon
       
    26     ^ ToolbarIconLibrary methodFinder24x24Icon
       
    27 
       
    28     "Created: / 01-06-2012 / 13:05:11 / cg"
       
    29 !
       
    30 
    25 markerForImplementingClass
    31 markerForImplementingClass
    26     ^ '=> '.
    32     ^ '=> '.
    27     ^ '*'
    33     ^ '*'
    28 
    34 
    29     "Created: / 13.11.2001 / 12:09:52 / cg"
    35     "Created: / 13.11.2001 / 12:09:52 / cg"
    52         name: windowSpec
    58         name: windowSpec
    53         window: 
    59         window: 
    54        (WindowSpec
    60        (WindowSpec
    55           label: 'MethodFinder'
    61           label: 'MethodFinder'
    56           name: 'MethodFinder'
    62           name: 'MethodFinder'
    57           bounds: (Rectangle 0 0 550 400)
    63           bounds: (Rectangle 0 0 798 595)
    58           menu: menu
    64           menu: menu
       
    65           icon: defaultIcon
    59         )
    66         )
    60         component: 
    67         component: 
    61        (SpecCollection
    68        (SpecCollection
    62           collection: (
    69           collection: (
    63            (VariableHorizontalPanelSpec
    70            (VariableHorizontalPanelSpec
   115                                       hasVerticalScrollBar: true
   122                                       hasVerticalScrollBar: true
   116                                       miniScrollerHorizontal: true
   123                                       miniScrollerHorizontal: true
   117                                       miniScrollerVertical: true
   124                                       miniScrollerVertical: true
   118                                       autoHideScrollBars: true
   125                                       autoHideScrollBars: true
   119                                       hasKeyboardFocusInitially: false
   126                                       hasKeyboardFocusInitially: false
   120                                       extent: (Point 87 74)
   127                                       extent: (Point 113 172)
   121                                       postBuildCallback: receiverWidgetCreated:
   128                                       postBuildCallback: receiverWidgetCreated:
   122                                     )
   129                                     )
   123                                    (VerticalPanelViewSpec
   130                                    (VerticalPanelViewSpec
   124                                       name: 'VerticalPanel1'
   131                                       name: 'VerticalPanel1'
   125                                       horizontalLayout: fit
   132                                       horizontalLayout: fit
   148                                                   postBuildCallback: argument1WidgetCreated:
   155                                                   postBuildCallback: argument1WidgetCreated:
   149                                                 )
   156                                                 )
   150                                                )
   157                                                )
   151                                              
   158                                              
   152                                             )
   159                                             )
   153                                             extent: (Point 87 23)
   160                                             extent: (Point 114 55)
   154                                           )
   161                                           )
   155                                          (ViewSpec
   162                                          (ViewSpec
   156                                             name: 'Box2'
   163                                             name: 'Box2'
   157                                             visibilityChannel: arg2BoxVisible
   164                                             visibilityChannel: arg2BoxVisible
   158                                             component: 
   165                                             component: 
   171                                                   postBuildCallback: argument2WidgetCreated:
   178                                                   postBuildCallback: argument2WidgetCreated:
   172                                                 )
   179                                                 )
   173                                                )
   180                                                )
   174                                              
   181                                              
   175                                             )
   182                                             )
   176                                             extent: (Point 87 22)
   183                                             extent: (Point 114 56)
   177                                           )
   184                                           )
   178                                          (ViewSpec
   185                                          (ViewSpec
   179                                             name: 'Box3'
   186                                             name: 'Box3'
   180                                             visibilityChannel: arg3BoxVisible
   187                                             visibilityChannel: arg3BoxVisible
   181                                             component: 
   188                                             component: 
   194                                                   postBuildCallback: argument3WidgetCreated:
   201                                                   postBuildCallback: argument3WidgetCreated:
   195                                                 )
   202                                                 )
   196                                                )
   203                                                )
   197                                              
   204                                              
   198                                             )
   205                                             )
   199                                             extent: (Point 87 23)
   206                                             extent: (Point 114 55)
   200                                           )
   207                                           )
   201                                          )
   208                                          )
   202                                        
   209                                        
   203                                       )
   210                                       )
   204                                       extent: (Point 87 74)
   211                                       extent: (Point 114 172)
   205                                     )
   212                                     )
   206                                    (WorkspaceSpec
   213                                    (WorkspaceSpec
   207                                       name: 'AnswerEditor'
   214                                       name: 'AnswerEditor'
   208                                       tabable: true
   215                                       tabable: true
   209                                       hasHorizontalScrollBar: true
   216                                       hasHorizontalScrollBar: true
   210                                       hasVerticalScrollBar: true
   217                                       hasVerticalScrollBar: true
   211                                       miniScrollerHorizontal: true
   218                                       miniScrollerHorizontal: true
   212                                       miniScrollerVertical: true
   219                                       miniScrollerVertical: true
   213                                       autoHideScrollBars: true
   220                                       autoHideScrollBars: true
   214                                       hasKeyboardFocusInitially: false
   221                                       hasKeyboardFocusInitially: false
   215                                       extent: (Point 88 74)
   222                                       extent: (Point 114 172)
   216                                       postBuildCallback: messageAnswerWidgetCreated:
   223                                       postBuildCallback: messageAnswerWidgetCreated:
   217                                     )
   224                                     )
   218                                    )
   225                                    )
   219                                  
   226                                  
   220                                 )
   227                                 )
   328                     handles: (Any 0.5 1.0)
   335                     handles: (Any 0.5 1.0)
   329                   )
   336                   )
   330                  )
   337                  )
   331                
   338                
   332               )
   339               )
   333               handles: (Any 0.5 1.0)
   340               handles: (Any 0.443786982248521 1.0)
   334             )
   341             )
   335            )
   342            )
   336          
   343          
   337         )
   344         )
   338       )
   345       )
   859         holder value:{
   866         holder value:{
   860                         'Please enter combination of' .
   867                         'Please enter combination of' .
   861                         '    ',('receiver, arg and result' allBold) .
   868                         '    ',('receiver, arg and result' allBold) .
   862                         'or a'.
   869                         'or a'.
   863                         '    ',('selector search pattern' allBold) .
   870                         '    ',('selector search pattern' allBold) .
   864                         'into the above fields,'.
   871                         'into the above fields, then click on either ',('"search"' allBold),'-button.'
   865                         'then click on either ',('"search"' allBold),'-button.'
       
   866                      }
   872                      }
   867     ].
   873     ].
   868     ^ holder.
   874     ^ holder.
   869 
   875 
   870     "Modified: / 27-04-2012 / 15:14:32 / cg"
   876     "Modified: / 01-06-2012 / 13:06:02 / cg"
   871 !
   877 !
   872 
   878 
   873 selectedClassOfResultHolder
   879 selectedClassOfResultHolder
   874     "Return a valueHolder which contains the index of the selected result class
   880     "Return a valueHolder which contains the index of the selected result class
   875      (right list)"
   881      (right list)"