AssistantApplication.st
changeset 4470 fe8e1fb37521
parent 4420 2cd042c5b0ce
child 4586 9cc3c58352c4
equal deleted inserted replaced
4469:a4d672240503 4470:fe8e1fb37521
   130     "
   130     "
   131 
   131 
   132     <resource: #canvas>
   132     <resource: #canvas>
   133 
   133 
   134     ^ 
   134     ^ 
   135      #(FullSpec
   135     #(FullSpec
   136         name: windowSpec
   136        name: windowSpec
   137         window: 
   137        window: 
   138        (WindowSpec
   138       (WindowSpec
   139           label: 'Assistant'
   139          label: 'Assistant'
   140           name: 'Assistant'
   140          name: 'Assistant'
   141           bounds: (Rectangle 0 0 534 440)
   141          bounds: (Rectangle 0 0 806 608)
   142           menu: mainMenu
   142          menu: mainMenu
   143           icon: defaultIcon
   143          icon: defaultIcon
   144         )
   144        )
   145         component: 
   145        component: 
   146        (SpecCollection
   146       (SpecCollection
   147           collection: (
   147          collection: (
   148            (ViewSpec
   148           (ViewSpec
   149               name: 'Box1'
   149              name: 'Box1'
   150               layout: (LayoutFrame 0 0 0 0 0 1 -25 1)
   150              layout: (LayoutFrame 0 0 0 0 0 1 -25 1)
   151               component: 
   151              component: 
   152              (SpecCollection
   152             (SpecCollection
   153                 collection: (
   153                collection: (
   154                  (VariableHorizontalPanelSpec
   154                 (VariableHorizontalPanelSpec
   155                     name: 'MainHorizontalPanel'
   155                    name: 'MainHorizontalPanel'
   156                     layout: (LayoutFrame 0 0 0 0 0 1 -40 1)
   156                    layout: (LayoutFrame 0 0 0 0 0 1 -40 1)
   157                     component: 
   157                    component: 
   158                    (SpecCollection
   158                   (SpecCollection
   159                       collection: (
   159                      collection: (
   160                        (ViewSpec
   160                       (ViewSpec
   161                           name: 'Box2'
   161                          name: 'Box2'
   162                           component: 
   162                          component: 
   163                          (SpecCollection
   163                         (SpecCollection
   164                             collection: (
   164                            collection: (
   165                              (VariableVerticalPanelSpec
   165                             (VariableVerticalPanelSpec
   166                                 name: 'VariableVerticalPanel1'
   166                                name: 'VariableVerticalPanel1'
   167                                 layout: (LayoutFrame 0 0 0 0 0 1 0 1)
   167                                layout: (LayoutFrame 0 0 0 0 0 1 0 1)
   168                                 component: 
   168                                component: 
   169                                (SpecCollection
   169                               (SpecCollection
   170                                   collection: (
   170                                  collection: (
   171                                    (SequenceViewSpec
   171                                   (SequenceViewSpec
   172                                       name: 'PagesLabelList'
   172                                      name: 'PagesLabelList'
   173                                       level: 0
   173                                      level: 0
   174                                       enableChannel: false
   174                                      enableChannel: false
   175                                       hasHorizontalScrollBar: true
   175                                      hasHorizontalScrollBar: true
   176                                       hasVerticalScrollBar: true
   176                                      hasVerticalScrollBar: true
   177                                       miniScrollerHorizontal: true
   177                                      miniScrollerHorizontal: true
   178                                       useIndex: true
   178                                      useIndex: true
   179                                       sequenceList: pageLabelsInList
   179                                      sequenceList: pageLabelsInList
   180                                     )
       
   181                                    (HTMLViewSpec
       
   182                                       name: 'HTMLBrowser1'
       
   183                                       level: 0
       
   184                                       hasHorizontalScrollBar: true
       
   185                                       hasVerticalScrollBar: true
       
   186                                       miniScrollerHorizontal: true
       
   187                                       miniScrollerVertical: false
       
   188                                       htmlText: pageInfoHolder
       
   189                                     )
       
   190                                    )
   180                                    )
   191                                  
   181                                   (HTMLViewSpec
   192                                 )
   182                                      name: 'HTMLBrowser1'
   193                                 handles: (Any 0.5 1.0)
   183                                      level: 0
   194                               )
   184                                      hasHorizontalScrollBar: true
       
   185                                      hasVerticalScrollBar: true
       
   186                                      miniScrollerHorizontal: true
       
   187                                      miniScrollerVertical: false
       
   188                                      htmlText: pageInfoHolder
       
   189                                    )
       
   190                                   )
       
   191                                 
       
   192                                )
       
   193                                handles: (Any 0.5 1.0)
   195                              )
   194                              )
   196                            
   195                             )
   197                           )
   196                           
   198                         )
   197                          )
   199                        (SubCanvasSpec
       
   200                           name: 'SubCanvas1'
       
   201                           hasHorizontalScrollBar: false
       
   202                           hasVerticalScrollBar: false
       
   203                           miniScrollerHorizontal: false
       
   204                           miniScrollerVertical: false
       
   205                           specHolder: currentPageSpecHolder
       
   206                           createNewBuilder: false
       
   207                         )
       
   208                        )
   198                        )
   209                      
   199                       (SubCanvasSpec
   210                     )
   200                          name: 'SubCanvas1'
   211                     handles: (Any 0.5 1.0)
   201                          hasHorizontalScrollBar: false
   212                   )
   202                          hasVerticalScrollBar: false
   213                  (HorizontalPanelViewSpec
   203                          miniScrollerHorizontal: false
   214                     name: 'TwoPanelsPanel'
   204                          miniScrollerVertical: false
   215                     layout: (LayoutFrame 0 0 -40 1 0 1 0 1)
   205                          specHolder: currentPageSpecHolder
   216                     horizontalLayout: fit
   206                          createNewBuilder: false
   217                     verticalLayout: fit
   207                        )
   218                     horizontalSpace: 3
   208                       )
   219                     verticalSpace: 3
   209                     
   220                     reverseOrderIfOKAtLeft: true
   210                    )
   221                     component: 
   211                    handles: (Any 0.5 1.0)
   222                    (SpecCollection
   212                  )
   223                       collection: (
   213                 (HorizontalPanelViewSpec
   224                        (HorizontalPanelViewSpec
   214                    name: 'TwoPanelsPanel'
   225                           name: 'ButtonPanel2'
   215                    layout: (LayoutFrame 0 0 -40 1 0 1 0 1)
   226                           horizontalLayout: rightSpaceMax
   216                    horizontalLayout: fit
   227                           verticalLayout: center
   217                    verticalLayout: fit
   228                           horizontalSpace: 3
   218                    horizontalSpace: 3
   229                           verticalSpace: 3
   219                    verticalSpace: 3
   230                           ignoreInvisibleComponents: false
   220                    reverseOrderIfOKAtLeft: true
   231                           reverseOrderIfOKAtLeft: true
   221                    component: 
   232                           component: 
   222                   (SpecCollection
   233                          (SpecCollection
   223                      collection: (
   234                             collection: (
   224                       (HorizontalPanelViewSpec
   235                              (ActionButtonSpec
   225                          name: 'ButtonPanel2'
   236                                 label: 'Cancel'
   226                          horizontalLayout: rightSpaceMax
   237                                 name: 'Button8'
   227                          verticalLayout: center
   238                                 visibilityChannel: cancelButtonVisible
   228                          horizontalSpace: 3
   239                                 translateLabel: true
   229                          verticalSpace: 3
   240                                 resizeForLabel: true
   230                          ignoreInvisibleComponents: false
   241                                 model: doCancel
   231                          reverseOrderIfOKAtLeft: true
   242                                 extent: (Point 80 22)
   232                          component: 
   243                               )
   233                         (SpecCollection
   244                              (ActionButtonSpec
   234                            collection: (
   245                                 label: 'Finish'
   235                             (ActionButtonSpec
   246                                 name: 'Button7'
   236                                label: 'Cancel'
   247                                 visibilityChannel: finishButtonVisible
   237                                name: 'Button8'
   248                                 translateLabel: true
   238                                visibilityChannel: cancelButtonVisible
   249                                 resizeForLabel: true
   239                                translateLabel: true
   250                                 model: doFinish
   240                                resizeForLabel: true
   251                                 enableChannel: finishButtonEnabled
   241                                model: doCancel
   252                                 extent: (Point 80 22)
   242                                extent: (Point 80 22)
   253                               )
       
   254                              )
   243                              )
   255                            
   244                             (ActionButtonSpec
   256                           )
   245                                label: 'Finish'
   257                           extent: (Point 265 40)
   246                                name: 'Button7'
   258                         )
   247                                visibilityChannel: finishButtonVisible
   259                        (HorizontalPanelViewSpec
   248                                translateLabel: true
   260                           name: 'ButtonPanel1'
   249                                resizeForLabel: true
   261                           horizontalLayout: centerMax
   250                                model: doFinish
   262                           verticalLayout: center
   251                                enableChannel: finishButtonEnabled
   263                           horizontalSpace: 3
   252                                extent: (Point 80 22)
   264                           verticalSpace: 3
       
   265                           component: 
       
   266                          (SpecCollection
       
   267                             collection: (
       
   268                              (ActionButtonSpec
       
   269                                 label: 'Back'
       
   270                                 name: 'Button1'
       
   271                                 activeHelpKey: backButton
       
   272                                 visibilityChannel: backButtonVisible
       
   273                                 translateLabel: true
       
   274                                 labelChannel: backButtonLabelHolder
       
   275                                 model: goBackward
       
   276                                 enableChannel: backButtonEnabled
       
   277                                 useDefaultExtent: true
       
   278                               )
       
   279                              (ActionButtonSpec
       
   280                                 label: 'Next'
       
   281                                 name: 'Button2'
       
   282                                 activeHelpKey: nextButton
       
   283                                 visibilityChannel: forwardButtonVisible
       
   284                                 translateLabel: true
       
   285                                 labelChannel: nextButtonLabelHolder
       
   286                                 model: goForward
       
   287                                 enableChannel: forwardButtonEnabled
       
   288                                 useDefaultExtent: true
       
   289                               )
       
   290                              )
   253                              )
   291                            
   254                             )
   292                           )
   255                           
   293                           extent: (Point 266 40)
   256                          )
   294                         )
   257                          extent: (Point 401 40)
   295                        )
   258                        )
   296                      
   259                       (HorizontalPanelViewSpec
   297                     )
   260                          name: 'ButtonPanel1'
   298                   )
   261                          horizontalLayout: centerMax
       
   262                          verticalLayout: center
       
   263                          horizontalSpace: 3
       
   264                          verticalSpace: 3
       
   265                          component: 
       
   266                         (SpecCollection
       
   267                            collection: (
       
   268                             (ActionButtonSpec
       
   269                                label: 'Back'
       
   270                                name: 'Button1'
       
   271                                activeHelpKey: backButton
       
   272                                visibilityChannel: backButtonVisible
       
   273                                translateLabel: true
       
   274                                labelChannel: backButtonLabelHolder
       
   275                                model: goBackward
       
   276                                enableChannel: backButtonEnabled
       
   277                                useDefaultExtent: true
       
   278                              )
       
   279                             (ActionButtonSpec
       
   280                                label: 'Next'
       
   281                                name: 'Button2'
       
   282                                activeHelpKey: nextButton
       
   283                                visibilityChannel: forwardButtonVisible
       
   284                                translateLabel: true
       
   285                                labelChannel: nextButtonLabelHolder
       
   286                                model: goForward
       
   287                                enableChannel: forwardButtonEnabled
       
   288                                useDefaultExtent: true
       
   289                              )
       
   290                             )
       
   291                           
       
   292                          )
       
   293                          extent: (Point 402 40)
       
   294                        )
       
   295                       )
       
   296                     
       
   297                    )
   299                  )
   298                  )
   300                
   299                 )
   301               )
   300               
   302             )
   301              )
   303            (LabelSpec
       
   304               label: 'Label'
       
   305               name: 'Label1'
       
   306               layout: (LayoutFrame 1 0 -25 1 -1 1 -1 1)
       
   307               level: -1
       
   308               translateLabel: true
       
   309               labelChannel: infoHolder
       
   310               adjust: left
       
   311             )
       
   312            )
   302            )
   313          
   303           (LabelSpec
   314         )
   304              label: 'Label'
   315       )
   305              name: 'Label1'
       
   306              layout: (LayoutFrame 1 0 -25 1 -1 1 -1 1)
       
   307              level: -1
       
   308              translateLabel: true
       
   309              labelChannel: infoHolder
       
   310              adjust: left
       
   311            )
       
   312           )
       
   313         
       
   314        )
       
   315      )
   316 ! !
   316 ! !
   317 
   317 
   318 !AssistantApplication class methodsFor:'menu specs'!
   318 !AssistantApplication class methodsFor:'menu specs'!
   319 
   319 
   320 mainMenu
   320 mainMenu
   855 ! !
   855 ! !
   856 
   856 
   857 !AssistantApplication class methodsFor:'documentation'!
   857 !AssistantApplication class methodsFor:'documentation'!
   858 
   858 
   859 version
   859 version
   860     ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.26 2013-09-24 20:21:57 cg Exp $'
   860     ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.27 2014-01-24 12:48:43 cg Exp $'
   861 !
   861 !
   862 
   862 
   863 version_CVS
   863 version_CVS
   864     ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.26 2013-09-24 20:21:57 cg Exp $'
   864     ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.27 2014-01-24 12:48:43 cg Exp $'
   865 ! !
   865 ! !
   866 
   866