TabListEditor.st
changeset 2346 d6fdeda319de
parent 2281 e6cc565bff35
child 2383 e76cc686a293
equal deleted inserted replaced
2345:abdefb8e2b52 2346:d6fdeda319de
   127     ^ super helpSpec addPairsFrom:#(
   127     ^ super helpSpec addPairsFrom:#(
   128 
   128 
   129 #addTabItem
   129 #addTabItem
   130 'Adds a new tab item.'
   130 'Adds a new tab item.'
   131 
   131 
       
   132 #applicationProvidesLabel
       
   133 'If on, the label''s string is a selector returning a string or bitmap image, which is used as logo in the tab item.'
       
   134 
   132 #autoHideScrollBars
   135 #autoHideScrollBars
   133 'ScrollBars should be made invisible dynamically, if there is nothing to scroll.'
   136 'ScrollBars should be made invisible dynamically, if there is nothing to scroll.'
   134 
   137 
   135 #basicTab
   138 #basicTab
   136 'Define the basic attributes.'
   139 'Define the basic attributes.'
   178 'Enable horizontal scrollability.'
   181 'Enable horizontal scrollability.'
   179 
   182 
   180 #label
   183 #label
   181 'Label of the tab item.'
   184 'Label of the tab item.'
   182 
   185 
   183 #labelDerivesFromApplication
       
   184 'If turned on, the label''s string is a selector returning a string or bitmap image, which is used as logo in the tab item.'
       
   185 
       
   186 #majorKey
   186 #majorKey
   187 'Name of the class to be started (application if empty); or app-selector returning application instance.'
   187 'Name of the class to be started (application if empty); or app-selector returning application instance.'
   188 
   188 
   189 #minorKey
   189 #minorKey
   190 'Message sent to the class which returns the window specification (default: #windowSpec).'
   190 'Message sent to the class which returns the window specification (default: #windowSpec).'
   191 
   191 
   192 #testPreview
   192 #testPreview
   193 'Turns on/off preview of the tab list.'
   193 'Turns on/off preview of the tab list.'
       
   194 
       
   195 #translateLabel
       
   196 'If on, the label is translated using the applications language resources.'
   194 
   197 
   195 #verticalMiniScroller
   198 #verticalMiniScroller
   196 'Use a mini-scroller as vertical scrollbar.'
   199 'Use a mini-scroller as vertical scrollbar.'
   197 
   200 
   198 #verticalScroller
   201 #verticalScroller
   244        (WindowSpec
   247        (WindowSpec
   245           label: 'Basic'
   248           label: 'Basic'
   246           name: 'Basic'
   249           name: 'Basic'
   247           min: (Point 10 10)
   250           min: (Point 10 10)
   248           max: (Point 1280 1024)
   251           max: (Point 1280 1024)
   249           bounds: (Rectangle 0 0 429 210)
   252           bounds: (Rectangle 0 0 429 240)
   250         )
   253         )
   251         component: 
   254         component: 
   252        (SpecCollection
   255        (SpecCollection
   253           collection: (
   256           collection: (
   254            (LabelSpec
   257            (LabelSpec
   340               acceptChannel: acceptChannel
   343               acceptChannel: acceptChannel
   341               modifiedChannel: modifiedChannel
   344               modifiedChannel: modifiedChannel
   342               acceptOnPointerLeave: false
   345               acceptOnPointerLeave: false
   343             )
   346             )
   344            (CheckBoxSpec
   347            (CheckBoxSpec
   345               label: 'Application Provides Translation '
   348               label: 'Translate Label '
   346               name: 'translateLabel'
   349               name: 'translateLabel'
   347               layout: (Point 96 135)
   350               layout: (LayoutFrame 96 0 135 0 308 0 161 0)
   348               activeHelpKey: labelDerivesFromApplication
   351               activeHelpKey: translateLabel
   349               tabable: true
   352               tabable: true
   350               model: translateLabel
   353               model: translateLabel
   351               translateLabel: true
   354               translateLabel: true
   352             )
   355             )
       
   356            (CheckBoxSpec
       
   357               label: 'Application Provides Label '
       
   358               name: 'CheckBox1'
       
   359               layout: (LayoutFrame 96 0 161 0 308 0 187 0)
       
   360               activeHelpKey: applicationProvidesLabel
       
   361               tabable: true
       
   362               model: applicationProvidesLabel
       
   363               translateLabel: true
       
   364             )
   353            (LabelSpec
   365            (LabelSpec
   354               label: 'Help Key:'
   366               label: 'Help Key:'
   355               name: 'activeHelp'
   367               name: 'activeHelp'
   356               layout: (AlignmentOrigin 98 0 190 0 1 0.5)
   368               layout: (AlignmentOrigin 98 0 203 0 1 0.5)
   357               translateLabel: true
   369               translateLabel: true
   358               resizeForLabel: true
   370               resizeForLabel: true
   359             )
   371             )
   360            (InputFieldSpec
   372            (InputFieldSpec
   361               name: 'activeHelpKey'
   373               name: 'activeHelpKey'
   362               layout: (LayoutFrame 100 0 179 0 -5 1.0 201 0)
   374               layout: (LayoutFrame 100 0 192 0 -5 1.0 214 0)
   363               activeHelpKey: label
   375               activeHelpKey: label
   364               tabable: true
   376               tabable: true
   365               model: activeHelpKey
   377               model: activeHelpKey
   366               group: inputGroup
   378               group: inputGroup
   367               type: symbolOrNil
   379               type: symbolOrNil