DataSetBuilder.st
changeset 829 dac49512301a
parent 826 6c879f404dfe
child 831 857f725404e6
equal deleted inserted replaced
828:12090f74be53 829:dac49512301a
    72 
    72 
    73 aspects
    73 aspects
    74     "get the aspects for the attributes of the table columns"
    74     "get the aspects for the attributes of the table columns"
    75 
    75 
    76     ^#(
    76     ^#(
       
    77         id
    77         label
    78         label
    78         canSelect
    79         canSelect
    79         choices
    80         choices
    80         editorType
    81         editorType
    81         formatString
    82         formatString
    82         labelIsImage
    83         labelIsImage
       
    84         translateLabel
    83         size
    85         size
    84         type
    86         type
    85         width
    87         width
    86         minWidth
    88         minWidth
    87         height
    89         height
   105         labelActionArgument
   107         labelActionArgument
   106         labelAlignment
   108         labelAlignment
   107         columnAlignment
   109         columnAlignment
   108      )
   110      )
   109 
   111 
   110 
   112     "Modified: / 19.5.1998 / 21:27:06 / cg"
   111 
       
   112 ! !
   113 ! !
   113 
   114 
   114 !DataSetBuilder class methodsFor:'help specs'!
   115 !DataSetBuilder class methodsFor:'help specs'!
   115 
   116 
   116 helpSpec
   117 helpSpec
   130 
   131 
   131 #addColumn
   132 #addColumn
   132 'Adds a new column.'
   133 'Adds a new column.'
   133 
   134 
   134 #basicsEditor
   135 #basicsEditor
   135 'Default widget type or a selector returning an instance of an user defined widget opened in the cell.'
   136 'Default widget type or a selector returning an instance of a user defined widget opened in the cell.'
   136 
   137 
   137 #basicsFont
   138 #basicsFont
   138 'Sets the font of the label text.'
   139 'Sets the font of the label text.'
   139 
   140 
   140 #basicsJustification
   141 #basicsJustification
   141 'Aligns the label text to the left, right, or centered in the cell.'
   142 'Aligns the label text to the left, right, or centered in the cell.'
   142 
   143 
   143 #basicsLabel
   144 #basicsLabel
   144 'The label of the column or a selector returning a string an image.'
   145 'The label of the column or a selector returning a string or an image.'
   145 
   146 
   146 #basicsLabelIsImage
   147 #basicsLabelIsImage
   147 'Turns on/off image behavior of the label string; i.e. it is used as selector returning an image.'
   148 'Turns on/off image behavior of the label string; i.e. it is used as selector returning an image.'
   148 
   149 
   149 #basicsRenderer
   150 #basicsRenderer
   150 'Specifies displaying cell as Text, CheckToggle, ComboBox, ComboList or as a RowSelector.'
   151 'Specifies displaying cell as Text, CheckToggle, ComboBox, ComboList or as a RowSelector.'
   151 
   152 
       
   153 #browseRowClass
       
   154 'Open a browser on the row class'
       
   155 
   152 #colorsBackgroundCellColor
   156 #colorsBackgroundCellColor
   153 'Sets the background color of the column.'
   157 'Sets the background color of the column.'
   154 
   158 
   155 #colorsBackgroundLabelColor
   159 #colorsBackgroundLabelColor
   156 'Sets the background color of the label.'
   160 'Sets the background color of the label.'
   165 'Sets the foreground color of the label.'
   169 'Sets the foreground color of the label.'
   166 
   170 
   167 #colorsForegroundSelector
   171 #colorsForegroundSelector
   168 'Selector returning the foreground color for a cell (optional).'
   172 'Selector returning the foreground color for a cell (optional).'
   169 
   173 
       
   174 #fileNew
       
   175 'Discard changes and continue with a new, empty column description'
       
   176 
       
   177 #fileLoad
       
   178 'Specify class/selector and edit that column description'
       
   179 
       
   180 #fileSave
       
   181 'Install the column description'
       
   182 
       
   183 #fileSaveAs
       
   184 'Specify class/selector and install the column description'
       
   185 
   170 #formatInputType
   186 #formatInputType
   171 'A type converter symbol used by the input field.'
   187 'A type converter symbol used by the input field.'
   172 
   188 
   173 #formatMaxSize
   189 #formatMaxSize
   174 'Maximum size of the string which can be typed in. 0 or nil means unlimited.'
   190 'Maximum size of the string which can be typed in. 0 or nil means unlimited.'
   189 'Turns on/off displaying column separators.'
   205 'Turns on/off displaying column separators.'
   190 
   206 
   191 #frameShowRowSeparator
   207 #frameShowRowSeparator
   192 'Turns on/off displaying row separators.'
   208 'Turns on/off displaying row separators.'
   193 
   209 
       
   210 #generate
       
   211 'Code generation.'
       
   212 
       
   213 #generateCode
       
   214 'Generate code and install in the selected class/selector.'
       
   215 
       
   216 #pickColumns
       
   217 'Select an open view and readOut the column specification from it.'
       
   218 
   194 #selectionCellClickSelector
   219 #selectionCellClickSelector
   195 'A selector called if cell was selected.'
   220 'A selector called if cell was selected.'
   196 
   221 
   197 #selectionCellDoubleClickSelector
   222 #selectionCellDoubleClickSelector
   198 'A selector called if cell was double clicked.'
   223 'A selector called if cell was double clicked.'
   223 
   248 
   224 #valuesWriteSelector
   249 #valuesWriteSelector
   225 'A selector used to set the value of a cell.'
   250 'A selector used to set the value of a cell.'
   226 
   251 
   227 )
   252 )
       
   253 
       
   254     "Modified: / 19.5.1998 / 23:20:51 / cg"
   228 ! !
   255 ! !
   229 
   256 
   230 !DataSetBuilder class methodsFor:'interface specs'!
   257 !DataSetBuilder class methodsFor:'interface specs'!
   231 
   258 
   232 basicsEditSpec
   259 basicsEditSpec
   247      
   274      
   248        #(#FullSpec
   275        #(#FullSpec
   249           #window: 
   276           #window: 
   250            #(#WindowSpec
   277            #(#WindowSpec
   251               #name: 'DataSet Basic'
   278               #name: 'DataSet Basic'
   252               #layout: #(#LayoutFrame 8 0 124 0 296 0 379 0)
   279               #layout: #(#LayoutFrame 216 0 173 0 538 0 499 0)
   253               #label: 'DataSet Basic'
   280               #label: 'DataSet Basic'
   254               #min: #(#Point 10 10)
   281               #min: #(#Point 10 10)
   255               #max: #(#Point 1280 1024)
   282               #max: #(#Point 1280 1024)
   256               #bounds: #(#Rectangle 8 124 297 380)
   283               #bounds: #(#Rectangle 216 173 539 500)
   257               #usePreferredExtent: false
   284               #usePreferredExtent: false
   258           )
   285           )
   259           #component: 
   286           #component: 
   260            #(#SpecCollection
   287            #(#SpecCollection
   261               #collection: 
   288               #collection: 
   262                #(
   289                #(
   263                  #(#FramedBoxSpec
   290                  #(#FramedBoxSpec
   264                     #name: 'framedBox1'
   291                     #name: 'framedBox1'
   265                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 145 0)
   292                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 164 0)
   266                     #component: 
   293                     #component: 
   267                      #(#SpecCollection
   294                      #(#SpecCollection
   268                         #collection: 
   295                         #collection: 
   269                          #(
   296                          #(
   270                            #(#LabelSpec
   297                            #(#LabelSpec
   271                               #name: 'label1'
   298                               #name: 'label1'
   272                               #layout: #(#AlignmentOrigin 107 0 32 0 1 0.5)
   299                               #layout: #(#AlignmentOrigin 107 0 52 0 1 0.5)
   273                               #label: 'Label:'
   300                               #label: 'Label:'
   274                               #resizeForLabel: true
   301                               #resizeForLabel: true
   275                           )
   302                           )
   276                            #(#InputFieldSpec
   303                            #(#InputFieldSpec
   277                               #name: 'labelField'
   304                               #name: 'labelField'
   278                               #layout: #(#LayoutFrame 110 0 21 0 15 1.0 43 0)
   305                               #layout: #(#LayoutFrame 110 0 41 0 15 1.0 63 0)
   279                               #activeHelpKey: #basicsLabel
   306                               #activeHelpKey: #basicsLabel
   280                               #tabable: true
   307                               #tabable: true
   281                               #model: #label
   308                               #model: #label
   282                           )
   309                           )
   283                            #(#CheckBoxSpec
       
   284                               #name: 'labelIsImage'
       
   285                               #layout: #(#LayoutOrigin 107 0 103 0)
       
   286                               #activeHelpKey: #basicsLabelIsImage
       
   287                               #tabable: true
       
   288                               #model: #labelIsImage
       
   289                               #label: 'Label Is Image'
       
   290                           )
       
   291                            #(#LabelSpec
   310                            #(#LabelSpec
   292                               #name: 'LabelFont'
   311                               #name: 'LabelFont'
   293                               #layout: #(#AlignmentOrigin 107 0 61 0 1 0.5)
   312                               #layout: #(#AlignmentOrigin 107 0 81 0 1 0.5)
   294                               #label: 'Font::'
   313                               #label: 'Font::'
   295                               #adjust: #left
   314                               #adjust: #left
   296                               #resizeForLabel: true
   315                               #resizeForLabel: true
   297                           )
   316                           )
   298                            #(#FontMenuSpec
   317                            #(#FontMenuSpec
   299                               #name: 'fontMenu'
   318                               #name: 'fontMenu'
   300                               #layout: #(#LayoutFrame 110 0 49 0 13 1.0 71 0)
   319                               #layout: #(#LayoutFrame 110 0 69 0 13 1.0 91 0)
   301                               #activeHelpKey: #labelFont
   320                               #activeHelpKey: #labelFont
   302                               #model: #style
   321                               #model: #style
   303                           )
   322                           )
   304                            #(#PopUpListSpec
   323                            #(#PopUpListSpec
   305                               #name: 'Alignment'
   324                               #name: 'Alignment'
   306                               #layout: #(#LayoutFrame 110 0 78 0 15 1.0 100 0)
   325                               #layout: #(#LayoutFrame 110 0 98 0 15 1.0 120 0)
   307                               #activeHelpKey: #basicsJustification
   326                               #activeHelpKey: #basicsJustification
   308                               #label: 'Alignment'
   327                               #label: 'Alignment'
   309                               #model: #labelAlignment
   328                               #model: #labelAlignment
   310                               #menu: 
   329                               #menu: 
   311                                #(#left
   330                                #(#left
   313                               )
   332                               )
   314                               #useIndex: false
   333                               #useIndex: false
   315                           )
   334                           )
   316                            #(#LabelSpec
   335                            #(#LabelSpec
   317                               #name: 'JustificationLabel'
   336                               #name: 'JustificationLabel'
   318                               #layout: #(#AlignmentOrigin 107 0 89 0 1 0.5)
   337                               #layout: #(#AlignmentOrigin 107 0 109 0 1 0.5)
   319                               #label: 'Justification:'
   338                               #label: 'Justification:'
   320                               #adjust: #left
   339                               #adjust: #left
   321                               #resizeForLabel: true
   340                               #resizeForLabel: true
       
   341                           )
       
   342                            #(#CheckBoxSpec
       
   343                               #name: 'labelIsImage'
       
   344                               #layout: #(#LayoutOrigin 10 0 123 0)
       
   345                               #activeHelpKey: #basicsLabelIsImage
       
   346                               #tabable: true
       
   347                               #model: #labelIsImage
       
   348                               #label: 'Label Is Image'
       
   349                           )
       
   350                            #(#CheckBoxSpec
       
   351                               #name: 'CheckBox2'
       
   352                               #layout: #(#LayoutOrigin 155 0 123 0)
       
   353                               #activeHelpKey: #basicsLabelIsImage
       
   354                               #tabable: true
       
   355                               #model: #translateLabel
       
   356                               #label: 'Translate Label'
       
   357                           )
       
   358                            #(#LabelSpec
       
   359                               #name: 'idLabel'
       
   360                               #layout: #(#AlignmentOrigin 107 0 27 0 1 0.5)
       
   361                               #label: 'ID:'
       
   362                               #resizeForLabel: true
       
   363                           )
       
   364                            #(#InputFieldSpec
       
   365                               #name: 'idField'
       
   366                               #layout: #(#LayoutFrame 110 0 13 0 15 1.0 35 0)
       
   367                               #activeHelpKey: #basicsLabel
       
   368                               #tabable: true
       
   369                               #model: #id
   322                           )
   370                           )
   323                         )
   371                         )
   324                     )
   372                     )
   325                     #label: 'Header:'
   373                     #label: 'Header:'
   326                     #labelPosition: #topLeft
   374                     #labelPosition: #topLeft
   327                 )
   375                 )
   328                  #(#FramedBoxSpec
   376                  #(#FramedBoxSpec
   329                     #name: 'typesFrame'
   377                     #name: 'typesFrame'
   330                     #layout: #(#LayoutFrame 0 0.0 145 0 0 1.0 253 0)
   378                     #layout: #(#LayoutFrame 0 0.0 178 0 0 1.0 286 0)
   331                     #component: 
   379                     #component: 
   332                      #(#SpecCollection
   380                      #(#SpecCollection
   333                         #collection: 
   381                         #collection: 
   334                          #(
   382                          #(
   335                            #(#LabelSpec
   383                            #(#LabelSpec
   388                     #labelPosition: #topLeft
   436                     #labelPosition: #topLeft
   389                 )
   437                 )
   390               )
   438               )
   391           )
   439           )
   392       )
   440       )
       
   441 
       
   442     "Modified: / 19.5.1998 / 22:33:10 / cg"
   393 !
   443 !
   394 
   444 
   395 colorsEditSpec
   445 colorsEditSpec
   396     "This resource specification was automatically generated
   446     "This resource specification was automatically generated
   397      by the UIPainter of ST/X."
   447      by the UIPainter of ST/X."
   630      
   680      
   631        #(#FullSpec
   681        #(#FullSpec
   632           #window: 
   682           #window: 
   633            #(#WindowSpec
   683            #(#WindowSpec
   634               #name: 'DataSet Details'
   684               #name: 'DataSet Details'
   635               #layout: #(#LayoutFrame 329 0 353 0 716 0 644 0)
   685               #layout: #(#LayoutFrame 216 0 173 0 603 0 464 0)
   636               #label: 'DataSet Details'
   686               #label: 'DataSet Details'
   637               #min: #(#Point 10 10)
   687               #min: #(#Point 10 10)
   638               #max: #(#Point 1280 1024)
   688               #max: #(#Point 1280 1024)
   639               #bounds: #(#Rectangle 329 353 717 645)
   689               #bounds: #(#Rectangle 216 173 604 465)
   640               #usePreferredExtent: false
   690               #usePreferredExtent: false
   641           )
   691           )
   642           #component: 
   692           #component: 
   643            #(#SpecCollection
   693            #(#SpecCollection
   644               #collection: 
   694               #collection: 
   645                #(
   695                #(
   646                  #(#FramedBoxSpec
   696                  #(#FramedBoxSpec
   647                     #name: 'framedBox1'
   697                     #name: 'framedBox1'
   648                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 114 0)
   698                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 127 0)
   649                     #component: 
   699                     #component: 
   650                      #(#SpecCollection
   700                      #(#SpecCollection
   651                         #collection: 
   701                         #collection: 
   652                          #(
   702                          #(
   653                            #(#LabelSpec
   703                            #(#LabelSpec
   654                               #name: 'typeLabel'
   704                               #name: 'typeLabel'
   655                               #layout: #(#AlignmentOrigin 107 0 29 0 1 0.5)
   705                               #layout: #(#AlignmentOrigin 107 0 42 0 1 0.5)
   656                               #label: 'Input Type:'
   706                               #label: 'Input Type:'
   657                               #resizeForLabel: true
   707                               #resizeForLabel: true
   658                           )
   708                           )
   659                            #(#ComboListSpec
   709                            #(#ComboListSpec
   660                               #name: 'typeCombo'
   710                               #name: 'typeCombo'
   661                               #layout: #(#LayoutFrame 110 0 18 0 15 1.0 40 0)
   711                               #layout: #(#LayoutFrame 110 0 31 0 15 1.0 53 0)
   662                               #activeHelpKey: #formatInputType
   712                               #activeHelpKey: #formatInputType
   663                               #tabable: true
   713                               #tabable: true
   664                               #model: #type
   714                               #model: #type
   665                               #comboList: 
   715                               #comboList: 
   666                                #(#string
   716                                #(#string
   669                               )
   719                               )
   670                               #useIndex: false
   720                               #useIndex: false
   671                           )
   721                           )
   672                            #(#LabelSpec
   722                            #(#LabelSpec
   673                               #name: 'sizeLabel'
   723                               #name: 'sizeLabel'
   674                               #layout: #(#AlignmentOrigin 107 0 55 0 1 0.5)
   724                               #layout: #(#AlignmentOrigin 107 0 68 0 1 0.5)
   675                               #label: 'Max Size:'
   725                               #label: 'Max Size:'
   676                               #resizeForLabel: true
   726                               #resizeForLabel: true
   677                           )
   727                           )
   678                            #(#InputFieldSpec
   728                            #(#InputFieldSpec
   679                               #name: 'sizeField'
   729                               #name: 'sizeField'
   680                               #layout: #(#LayoutFrame 110 0 44 0 15 1.0 66 0)
   730                               #layout: #(#LayoutFrame 110 0 57 0 15 1.0 79 0)
   681                               #activeHelpKey: #formatMaxSize
   731                               #activeHelpKey: #formatMaxSize
   682                               #tabable: true
   732                               #tabable: true
   683                               #model: #size
   733                               #model: #size
   684                               #type: #numberOrNil
   734                               #type: #numberOrNil
   685                           )
   735                           )
   686                            #(#LabelSpec
   736                            #(#LabelSpec
   687                               #name: 'formatLabel'
   737                               #name: 'formatLabel'
   688                               #layout: #(#AlignmentOrigin 107 0 80 0 1 0.5)
   738                               #layout: #(#AlignmentOrigin 107 0 93 0 1 0.5)
   689                               #label: 'Text Format:'
   739                               #label: 'Text Format:'
   690                               #resizeForLabel: true
   740                               #resizeForLabel: true
   691                           )
   741                           )
   692                            #(#InputFieldSpec
   742                            #(#InputFieldSpec
   693                               #name: 'formatField'
   743                               #name: 'formatField'
   694                               #layout: #(#LayoutFrame 110 0 69 0 15 1.0 91 0)
   744                               #layout: #(#LayoutFrame 110 0 82 0 15 1.0 104 0)
   695                               #activeHelpKey: #formatTextFormat
   745                               #activeHelpKey: #formatTextFormat
   696                               #tabable: true
   746                               #tabable: true
   697                               #model: #formatString
   747                               #model: #formatString
   698                           )
   748                           )
   699                         )
   749                         )
   702                     #labelPosition: #topLeft
   752                     #labelPosition: #topLeft
   703                 )
   753                 )
   704               )
   754               )
   705           )
   755           )
   706       )
   756       )
       
   757 
       
   758     "Modified: / 19.5.1998 / 22:37:34 / cg"
   707 !
   759 !
   708 
   760 
   709 frameEditSpec
   761 frameEditSpec
   710     "This resource specification was automatically generated
   762     "This resource specification was automatically generated
   711      by the UIPainter of ST/X."
   763      by the UIPainter of ST/X."
   724      
   776      
   725        #(#FullSpec
   777        #(#FullSpec
   726           #window: 
   778           #window: 
   727            #(#WindowSpec
   779            #(#WindowSpec
   728               #name: 'DataSet Dimension'
   780               #name: 'DataSet Dimension'
   729               #layout: #(#LayoutFrame 512 0 370 0 802 0 583 0)
   781               #layout: #(#LayoutFrame 218 0 175 0 508 0 418 0)
   730               #label: 'DataSet Dimension'
   782               #label: 'DataSet Dimension'
   731               #min: #(#Point 10 10)
   783               #min: #(#Point 10 10)
   732               #max: #(#Point 1280 1024)
   784               #max: #(#Point 1280 1024)
   733               #bounds: #(#Rectangle 512 370 803 584)
   785               #bounds: #(#Rectangle 218 175 509 419)
   734               #usePreferredExtent: false
   786               #usePreferredExtent: false
   735           )
   787           )
   736           #component: 
   788           #component: 
   737            #(#SpecCollection
   789            #(#SpecCollection
   738               #collection: 
   790               #collection: 
   739                #(
   791                #(
   740                  #(#FramedBoxSpec
   792                  #(#FramedBoxSpec
   741                     #name: 'separatorBox'
   793                     #name: 'separatorBox'
   742                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 86 0)
   794                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 95 0)
   743                     #component: 
   795                     #component: 
   744                      #(#SpecCollection
   796                      #(#SpecCollection
   745                         #collection: 
   797                         #collection: 
   746                          #(
   798                          #(
   747                            #(#CheckBoxSpec
   799                            #(#CheckBoxSpec
   748                               #name: 'showRowSeparator'
   800                               #name: 'showRowSeparator'
   749                               #layout: #(#LayoutFrame 18 0 19 0 194 0 42 0)
   801                               #layout: #(#LayoutFrame 18 0 27 0 194 0 50 0)
   750                               #activeHelpKey: #frameShowRowSeparator
   802                               #activeHelpKey: #frameShowRowSeparator
   751                               #tabable: true
   803                               #tabable: true
   752                               #model: #showRowSeparator
   804                               #model: #showRowSeparator
   753                               #label: 'Show Row-Separator'
   805                               #label: 'Show Row-Separator'
   754                           )
   806                           )
   755                            #(#CheckBoxSpec
   807                            #(#CheckBoxSpec
   756                               #name: 'showColSeparator'
   808                               #name: 'showColSeparator'
   757                               #layout: #(#LayoutFrame 18 0 45 0 194 0 68 0)
   809                               #layout: #(#LayoutFrame 18 0 53 0 194 0 76 0)
   758                               #activeHelpKey: #frameShowColumnSeparator
   810                               #activeHelpKey: #frameShowColumnSeparator
   759                               #tabable: true
   811                               #tabable: true
   760                               #model: #showColSeparator
   812                               #model: #showColSeparator
   761                               #label: 'Show Column-Separator'
   813                               #label: 'Show Column-Separator'
   762                           )
   814                           )
   765                     #label: 'Separators'
   817                     #label: 'Separators'
   766                     #labelPosition: #topLeft
   818                     #labelPosition: #topLeft
   767                 )
   819                 )
   768                  #(#FramedBoxSpec
   820                  #(#FramedBoxSpec
   769                     #name: 'framedBox1'
   821                     #name: 'framedBox1'
   770                     #layout: #(#LayoutFrame 0 0.0 86 0 0 1.0 198 0)
   822                     #layout: #(#LayoutFrame 0 0.0 108 0 0 1.0 225 0)
   771                     #component: 
   823                     #component: 
   772                      #(#SpecCollection
   824                      #(#SpecCollection
   773                         #collection: 
   825                         #collection: 
   774                          #(
   826                          #(
   775                            #(#LabelSpec
   827                            #(#LabelSpec
   776                               #name: 'widthLabel'
   828                               #name: 'widthLabel'
   777                               #layout: #(#AlignmentOrigin 107 0.0 28 0 1 0.5)
   829                               #layout: #(#AlignmentOrigin 127 0.0 35 0 1 0.5)
   778                               #label: 'Column Width:'
   830                               #label: 'Column Width:'
   779                               #adjust: #right
   831                               #adjust: #right
   780                               #resizeForLabel: true
   832                               #resizeForLabel: true
   781                           )
   833                           )
   782                            #(#InputFieldSpec
   834                            #(#InputFieldSpec
   783                               #name: 'widthField'
   835                               #name: 'widthField'
   784                               #layout: #(#LayoutFrame 110 0 17 0 15 1.0 39 0)
   836                               #layout: #(#LayoutFrame 130 0 24 0 15 1.0 46 0)
   785                               #activeHelpKey: #frameColumnWidth
   837                               #activeHelpKey: #frameColumnWidth
   786                               #tabable: true
   838                               #tabable: true
   787                               #model: #width
   839                               #model: #width
   788                               #type: #numberOrNil
   840                               #type: #numberOrNil
   789                           )
   841                           )
   790                            #(#LabelSpec
   842                            #(#LabelSpec
   791                               #name: 'minWidthLabel'
   843                               #name: 'minWidthLabel'
   792                               #layout: #(#AlignmentOrigin 107 0.0 53 0 1 0.5)
   844                               #layout: #(#AlignmentOrigin 127 0.0 63 0 1 0.5)
   793                               #label: 'Min Width:'
   845                               #label: 'Min Width:'
   794                               #adjust: #right
   846                               #adjust: #right
   795                               #resizeForLabel: true
   847                               #resizeForLabel: true
   796                           )
   848                           )
   797                            #(#InputFieldSpec
   849                            #(#InputFieldSpec
   798                               #name: 'minWidthField'
   850                               #name: 'minWidthField'
   799                               #layout: #(#LayoutFrame 110 0 42 0 15 1.0 64 0)
   851                               #layout: #(#LayoutFrame 130 0 52 0 15 1.0 74 0)
   800                               #activeHelpKey: #frameMinWidth
   852                               #activeHelpKey: #frameMinWidth
   801                               #tabable: true
   853                               #tabable: true
   802                               #model: #minWidth
   854                               #model: #minWidth
   803                               #type: #numberOrNil
   855                               #type: #numberOrNil
   804                           )
   856                           )
   805                            #(#LabelSpec
   857                            #(#LabelSpec
   806                               #name: 'heightLabel'
   858                               #name: 'heightLabel'
   807                               #layout: #(#AlignmentOrigin 107 0.0 84 0 1 0.5)
   859                               #layout: #(#AlignmentOrigin 127 0.0 91 0 1 0.5)
   808                               #label: 'Row Height:'
   860                               #label: 'Row Height:'
   809                               #adjust: #right
   861                               #adjust: #right
   810                               #resizeForLabel: true
   862                               #resizeForLabel: true
   811                           )
   863                           )
   812                            #(#InputFieldSpec
   864                            #(#InputFieldSpec
   813                               #name: 'heightField'
   865                               #name: 'heightField'
   814                               #layout: #(#LayoutFrame 110 0 73 0 15 1.0 95 0)
   866                               #layout: #(#LayoutFrame 130 0 80 0 15 1.0 102 0)
   815                               #activeHelpKey: #frameRowHeight
   867                               #activeHelpKey: #frameRowHeight
   816                               #tabable: true
   868                               #tabable: true
   817                               #model: #height
   869                               #model: #height
   818                               #type: #numberOrNil
   870                               #type: #numberOrNil
   819                           )
   871                           )
   823                     #labelPosition: #topLeft
   875                     #labelPosition: #topLeft
   824                 )
   876                 )
   825               )
   877               )
   826           )
   878           )
   827       )
   879       )
       
   880 
       
   881     "Modified: / 19.5.1998 / 22:39:23 / cg"
   828 !
   882 !
   829 
   883 
   830 selectionEditSpec
   884 selectionEditSpec
   831     "This resource specification was automatically generated
   885     "This resource specification was automatically generated
   832      by the UIPainter of ST/X."
   886      by the UIPainter of ST/X."
   845      
   899      
   846        #(#FullSpec
   900        #(#FullSpec
   847           #window: 
   901           #window: 
   848            #(#WindowSpec
   902            #(#WindowSpec
   849               #name: 'DataSet Basic'
   903               #name: 'DataSet Basic'
   850               #layout: #(#LayoutFrame 533 0 372 0 821 0 627 0)
   904               #layout: #(#LayoutFrame 218 0 175 0 506 0 430 0)
   851               #label: 'DataSet Basic'
   905               #label: 'DataSet Basic'
   852               #min: #(#Point 10 10)
   906               #min: #(#Point 10 10)
   853               #max: #(#Point 1280 1024)
   907               #max: #(#Point 1280 1024)
   854               #bounds: #(#Rectangle 533 372 822 628)
   908               #bounds: #(#Rectangle 218 175 507 431)
   855               #usePreferredExtent: false
   909               #usePreferredExtent: false
   856           )
   910           )
   857           #component: 
   911           #component: 
   858            #(#SpecCollection
   912            #(#SpecCollection
   859               #collection: 
   913               #collection: 
   860                #(
   914                #(
   861                  #(#FramedBoxSpec
   915                  #(#FramedBoxSpec
   862                     #name: 'framedBox1'
   916                     #name: 'framedBox1'
   863                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 85 0)
   917                     #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 87 0)
   864                     #component: 
   918                     #component: 
   865                      #(#SpecCollection
   919                      #(#SpecCollection
   866                         #collection: 
   920                         #collection: 
   867                          #(
   921                          #(
   868                            #(#LabelSpec
   922                            #(#LabelSpec
   869                               #name: 'ActionLabel'
   923                               #name: 'ActionLabel'
   870                               #layout: #(#AlignmentOrigin 107 0 28 0 1 0.5)
   924                               #layout: #(#AlignmentOrigin 107 0 33 0 1 0.5)
   871                               #label: 'Selector:'
   925                               #label: 'Selector:'
   872                               #adjust: #left
   926                               #adjust: #left
   873                               #resizeForLabel: true
   927                               #resizeForLabel: true
   874                           )
   928                           )
   875                            #(#InputFieldSpec
   929                            #(#InputFieldSpec
   876                               #name: 'ActionSelector'
   930                               #name: 'ActionSelector'
   877                               #layout: #(#LayoutFrame 110 0 17 0 15 1.0 39 0)
   931                               #layout: #(#LayoutFrame 110 0 22 0 15 1.0 44 0)
   878                               #activeHelpKey: #selectionLabelClickSelector
   932                               #activeHelpKey: #selectionLabelClickSelector
   879                               #tabable: true
   933                               #tabable: true
   880                               #model: #labelActionSelector
   934                               #model: #labelActionSelector
   881                               #type: #symbolOrNil
   935                               #type: #symbolOrNil
   882                           )
   936                           )
   883                            #(#LabelSpec
   937                            #(#LabelSpec
   884                               #name: 'ArgumentLabel'
   938                               #name: 'ArgumentLabel'
   885                               #layout: #(#AlignmentOrigin 107 0 53 0 1 0.5)
   939                               #layout: #(#AlignmentOrigin 107 0 58 0 1 0.5)
   886                               #label: 'Argument:'
   940                               #label: 'Argument:'
   887                               #adjust: #left
   941                               #adjust: #left
   888                               #resizeForLabel: true
   942                               #resizeForLabel: true
   889                           )
   943                           )
   890                            #(#InputFieldSpec
   944                            #(#InputFieldSpec
   891                               #name: 'ArgumentValue'
   945                               #name: 'ArgumentValue'
   892                               #layout: #(#LayoutFrame 110 0 42 0 15 1.0 64 0)
   946                               #layout: #(#LayoutFrame 110 0 47 0 15 1.0 69 0)
   893                               #activeHelpKey: #selectionLabelSelectorArgument
   947                               #activeHelpKey: #selectionLabelSelectorArgument
   894                               #tabable: true
   948                               #tabable: true
   895                               #model: #labelActionArgument
   949                               #model: #labelActionArgument
   896                               #type: #string
   950                               #type: #string
   897                           )
   951                           )
   900                     #label: 'Label Select Action:'
   954                     #label: 'Label Select Action:'
   901                     #labelPosition: #topLeft
   955                     #labelPosition: #topLeft
   902                 )
   956                 )
   903                  #(#FramedBoxSpec
   957                  #(#FramedBoxSpec
   904                     #name: 'framedBox2'
   958                     #name: 'framedBox2'
   905                     #layout: #(#LayoutFrame 0 0.0 85 0 0 1.0 166 0)
   959                     #layout: #(#LayoutFrame 0 0.0 95 0 0 1.0 178 0)
   906                     #component: 
   960                     #component: 
   907                      #(#SpecCollection
   961                      #(#SpecCollection
   908                         #collection: 
   962                         #collection: 
   909                          #(
   963                          #(
   910                            #(#CheckBoxSpec
   964                            #(#CheckBoxSpec
   911                               #name: 'canSelect'
   965                               #name: 'canSelect'
   912                               #layout: #(#Point 107 17)
   966                               #layout: #(#Point 107 21)
   913                               #activeHelpKey: #selectionIsSelectable
   967                               #activeHelpKey: #selectionIsSelectable
   914                               #tabable: true
   968                               #tabable: true
   915                               #model: #canSelect
   969                               #model: #canSelect
   916                               #label: 'Is Selectable'
   970                               #label: 'Is Selectable'
   917                           )
   971                           )
   918                            #(#LabelSpec
   972                            #(#LabelSpec
   919                               #name: 'selectorLabel'
   973                               #name: 'selectorLabel'
   920                               #layout: #(#AlignmentOrigin 107 0 53 0 1 0.5)
   974                               #layout: #(#AlignmentOrigin 107 0 57 0 1 0.5)
   921                               #label: 'Selector:'
   975                               #label: 'Selector:'
   922                               #adjust: #right
   976                               #adjust: #right
   923                               #resizeForLabel: true
   977                               #resizeForLabel: true
   924                           )
   978                           )
   925                            #(#InputFieldSpec
   979                            #(#InputFieldSpec
   926                               #name: 'selectSelector'
   980                               #name: 'selectSelector'
   927                               #layout: #(#LayoutFrame 110 0 42 0 15 1.0 64 0)
   981                               #layout: #(#LayoutFrame 110 0 46 0 15 1.0 68 0)
   928                               #activeHelpKey: #selectionCellClickSelector
   982                               #activeHelpKey: #selectionCellClickSelector
   929                               #tabable: true
   983                               #tabable: true
   930                               #model: #selectSelector
   984                               #model: #selectSelector
   931                               #type: #symbolOrNil
   985                               #type: #symbolOrNil
   932                           )
   986                           )
   935                     #label: 'Cell Selection:'
   989                     #label: 'Cell Selection:'
   936                     #labelPosition: #topLeft
   990                     #labelPosition: #topLeft
   937                 )
   991                 )
   938                  #(#FramedBoxSpec
   992                  #(#FramedBoxSpec
   939                     #name: 'framedBox3'
   993                     #name: 'framedBox3'
   940                     #layout: #(#LayoutFrame 0 0.0 166 0 0 1.0 220 0)
   994                     #layout: #(#LayoutFrame 0 0.0 186 0 0 1.0 243 0)
   941                     #component: 
   995                     #component: 
   942                      #(#SpecCollection
   996                      #(#SpecCollection
   943                         #collection: 
   997                         #collection: 
   944                          #(
   998                          #(
   945                            #(#LabelSpec
   999                            #(#LabelSpec
   946                               #name: 'doubleLabel'
  1000                               #name: 'doubleLabel'
   947                               #layout: #(#AlignmentOrigin 107 0 27 0 1 0.5)
  1001                               #layout: #(#AlignmentOrigin 107 0 32 0 1 0.5)
   948                               #label: 'Selector:'
  1002                               #label: 'Selector:'
   949                               #adjust: #right
  1003                               #adjust: #right
   950                               #resizeForLabel: true
  1004                               #resizeForLabel: true
   951                           )
  1005                           )
   952                            #(#InputFieldSpec
  1006                            #(#InputFieldSpec
   953                               #name: 'doubleClicked'
  1007                               #name: 'doubleClicked'
   954                               #layout: #(#LayoutFrame 110 0 16 0 15 1.0 38 0)
  1008                               #layout: #(#LayoutFrame 110 0 21 0 15 1.0 43 0)
   955                               #activeHelpKey: #selectionCellDoubleClickSelector
  1009                               #activeHelpKey: #selectionCellDoubleClickSelector
   956                               #tabable: true
  1010                               #tabable: true
   957                               #model: #doubleClickedSelector
  1011                               #model: #doubleClickedSelector
   958                               #type: #symbolOrNil
  1012                               #type: #symbolOrNil
   959                           )
  1013                           )
   963                     #labelPosition: #topLeft
  1017                     #labelPosition: #topLeft
   964                 )
  1018                 )
   965               )
  1019               )
   966           )
  1020           )
   967       )
  1021       )
       
  1022 
       
  1023     "Modified: / 19.5.1998 / 22:36:08 / cg"
   968 !
  1024 !
   969 
  1025 
   970 slices
  1026 slices
   971     ^#(
  1027     ^#(
   972         (Basics         basicsEditSpec)
  1028         (Basics         basicsEditSpec)
   996      
  1052      
   997        #(#FullSpec
  1053        #(#FullSpec
   998           #window: 
  1054           #window: 
   999            #(#WindowSpec
  1055            #(#WindowSpec
  1000               #name: 'DataSet Basic'
  1056               #name: 'DataSet Basic'
  1001               #layout: #(#LayoutFrame 501 0 386 0 796 0 691 0)
  1057               #layout: #(#LayoutFrame 216 0 173 0 511 0 478 0)
  1002               #label: 'DataSet Basic'
  1058               #label: 'DataSet Basic'
  1003               #min: #(#Point 10 10)
  1059               #min: #(#Point 10 10)
  1004               #max: #(#Point 1280 1024)
  1060               #max: #(#Point 1280 1024)
  1005               #bounds: #(#Rectangle 501 386 797 692)
  1061               #bounds: #(#Rectangle 216 173 512 479)
  1006               #usePreferredExtent: false
  1062               #usePreferredExtent: false
  1007           )
  1063           )
  1008           #component: 
  1064           #component: 
  1009            #(#SpecCollection
  1065            #(#SpecCollection
  1010               #collection: 
  1066               #collection: 
  1066                     #label: 'Value Selectors:'
  1122                     #label: 'Value Selectors:'
  1067                     #labelPosition: #topLeft
  1123                     #labelPosition: #topLeft
  1068                 )
  1124                 )
  1069                  #(#FramedBoxSpec
  1125                  #(#FramedBoxSpec
  1070                     #name: 'menusBox'
  1126                     #name: 'menusBox'
  1071                     #layout: #(#LayoutFrame 0 0.0 110 0 0 1.0 167 0)
  1127                     #layout: #(#LayoutFrame 0 0.0 119 0 0 1.0 176 0)
  1072                     #component: 
  1128                     #component: 
  1073                      #(#SpecCollection
  1129                      #(#SpecCollection
  1074                         #collection: 
  1130                         #collection: 
  1075                          #(
  1131                          #(
  1076                            #(#LabelSpec
  1132                            #(#LabelSpec
  1093                     #label: 'Menu:'
  1149                     #label: 'Menu:'
  1094                     #labelPosition: #topLeft
  1150                     #labelPosition: #topLeft
  1095                 )
  1151                 )
  1096                  #(#FramedBoxSpec
  1152                  #(#FramedBoxSpec
  1097                     #name: 'framedBox1'
  1153                     #name: 'framedBox1'
  1098                     #layout: #(#LayoutFrame 1 0.0 167 0 1 1.0 225 0)
  1154                     #layout: #(#LayoutFrame 1 0.0 191 0 1 1.0 249 0)
  1099                     #component: 
  1155                     #component: 
  1100                      #(#SpecCollection
  1156                      #(#SpecCollection
  1101                         #collection: 
  1157                         #collection: 
  1102                          #(
  1158                          #(
  1103                            #(#LabelSpec
  1159                            #(#LabelSpec
  1122                     #labelPosition: #topLeft
  1178                     #labelPosition: #topLeft
  1123                 )
  1179                 )
  1124               )
  1180               )
  1125           )
  1181           )
  1126       )
  1182       )
       
  1183 
       
  1184     "Modified: / 19.5.1998 / 22:33:53 / cg"
  1127 !
  1185 !
  1128 
  1186 
  1129 windowSpec
  1187 windowSpec
  1130     "This resource specification was automatically generated
  1188     "This resource specification was automatically generated
  1131      by the UIPainter of ST/X."
  1189      by the UIPainter of ST/X."
  1145      
  1203      
  1146        #(#FullSpec
  1204        #(#FullSpec
  1147           #window: 
  1205           #window: 
  1148            #(#WindowSpec
  1206            #(#WindowSpec
  1149               #name: 'Data Set Builder'
  1207               #name: 'Data Set Builder'
  1150               #layout: #(#LayoutFrame 314 0 309 0 853 0 808 0)
  1208               #layout: #(#LayoutFrame 28 0 46 0 660 0 612 0)
  1151               #label: 'Data Set Builder'
  1209               #label: 'Data Set Builder'
  1152               #min: #(#Point 10 10)
  1210               #min: #(#Point 10 10)
  1153               #max: #(#Point 1152 900)
  1211               #max: #(#Point 1152 900)
  1154               #bounds: #(#Rectangle 314 309 854 809)
  1212               #bounds: #(#Rectangle 28 46 661 613)
  1155               #menu: #menu
  1213               #menu: #menu
  1156               #usePreferredExtent: false
  1214               #usePreferredExtent: false
  1157           )
  1215           )
  1158           #component: 
  1216           #component: 
  1159            #(#SpecCollection
  1217            #(#SpecCollection
  1224                                          #(#SpecCollection
  1282                                          #(#SpecCollection
  1225                                             #collection: 
  1283                                             #collection: 
  1226                                              #(
  1284                                              #(
  1227                                                #(#TabViewSpec
  1285                                                #(#TabViewSpec
  1228                                                   #name: 'tabView'
  1286                                                   #name: 'tabView'
  1229                                                   #layout: #(#LayoutFrame 1 0.0 0 0 0 1.0 35 0)
  1287                                                   #layout: #(#LayoutFrame 1 0.0 0 0 0 1.0 50 0)
  1230                                                   #model: #tabModel
  1288                                                   #model: #tabModel
  1231                                                   #menu: #tabList
  1289                                                   #menu: #tabList
  1232                                                   #useIndex: true
  1290                                                   #useIndex: true
  1233                                               )
  1291                                               )
  1234                                                #(#SubCanvasSpec
  1292                                                #(#SubCanvasSpec
  1235                                                   #name: 'specCanvas'
  1293                                                   #name: 'specCanvas'
  1236                                                   #layout: #(#LayoutFrame 1 0.0 35 0.0 0 1.0 -30 1.0)
  1294                                                   #layout: #(#LayoutFrame 1 0.0 50 0.0 0 1.0 -30 1.0)
  1237                                                   #specHolder: #specChannel
  1295                                                   #specHolder: #specChannel
  1238                                               )
  1296                                               )
  1239                                                #(#UISubSpecification
  1297                                                #(#UISubSpecification
  1240                                                   #name: 'SubSpecification'
  1298                                                   #name: 'SubSpecification'
  1241                                                   #layout: #(#LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0)
  1299                                                   #layout: #(#LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0)
  1247                                         #level: -1
  1305                                         #level: -1
  1248                                     )
  1306                                     )
  1249                                   )
  1307                                   )
  1250                               )
  1308                               )
  1251                               #level: -1
  1309                               #level: -1
  1252                               #handles: #(#Any 0.311111 1.0)
  1310                               #handles: #(#Any 0.235387 1.0)
  1253                           )
  1311                           )
  1254                         )
  1312                         )
  1255                     )
  1313                     )
  1256                     #handles: #(#Any 0.25 1.0)
  1314                     #handles: #(#Any 0.25 1.0)
  1257                 )
  1315                 )
  1262                     #minorKey: #windowSpecForInfoBar
  1320                     #minorKey: #windowSpecForInfoBar
  1263                 )
  1321                 )
  1264               )
  1322               )
  1265           )
  1323           )
  1266       )
  1324       )
       
  1325 
       
  1326     "Modified: / 19.5.1998 / 23:35:33 / cg"
  1267 ! !
  1327 ! !
  1268 
  1328 
  1269 !DataSetBuilder class methodsFor:'menu specs'!
  1329 !DataSetBuilder class methodsFor:'menu specs'!
  1270 
  1330 
  1271 menu
  1331 menu
  1287        #(#Menu
  1347        #(#Menu
  1288           
  1348           
  1289            #(
  1349            #(
  1290              #(#MenuItem
  1350              #(#MenuItem
  1291                 #label: 'About'
  1351                 #label: 'About'
       
  1352                 #translateLabel: true
  1292                 #accessCharacterPosition: 1
  1353                 #accessCharacterPosition: 1
  1293                 #labelImage: #(#ResourceRetriever nil #menuIcon)
  1354                 #labelImage: #(#ResourceRetriever nil #menuIcon)
  1294                 #submenuChannel: #menuAbout
  1355                 #submenuChannel: #menuAbout
  1295             )
  1356             )
  1296              #(#MenuItem
  1357              #(#MenuItem
  1297                 #label: 'File'
  1358                 #label: 'File'
       
  1359                 #translateLabel: true
  1298                 #activeHelpKey: #file
  1360                 #activeHelpKey: #file
  1299                 #submenu: 
  1361                 #submenu: 
  1300                  #(#Menu
  1362                  #(#Menu
  1301                     
  1363                     
  1302                      #(
  1364                      #(
  1303                        #(#MenuItem
  1365                        #(#MenuItem
  1304                           #label: 'New'
  1366                           #label: 'New'
       
  1367                           #translateLabel: true
  1305                           #value: #doNew
  1368                           #value: #doNew
  1306                           #activeHelpKey: #fileNew
  1369                           #activeHelpKey: #fileNew
  1307                       )
  1370                       )
  1308                        #(#MenuItem
  1371                        #(#MenuItem
  1309                           #label: '-'
  1372                           #label: '-'
  1317                        #(#MenuItem
  1380                        #(#MenuItem
  1318                           #label: '-'
  1381                           #label: '-'
  1319                       )
  1382                       )
  1320                        #(#MenuItem
  1383                        #(#MenuItem
  1321                           #label: 'Save'
  1384                           #label: 'Save'
       
  1385                           #translateLabel: true
  1322                           #value: #doSave
  1386                           #value: #doSave
  1323                           #activeHelpKey: #fileSave
  1387                           #activeHelpKey: #fileSave
  1324                       )
  1388                       )
  1325                        #(#MenuItem
  1389                        #(#MenuItem
  1326                           #label: 'Save As...'
  1390                           #label: 'Save As...'
       
  1391                           #translateLabel: true
  1327                           #value: #doSaveAs
  1392                           #value: #doSaveAs
  1328                           #activeHelpKey: #fileSaveAs
  1393                           #activeHelpKey: #fileSaveAs
  1329                       )
  1394                       )
  1330                        #(#MenuItem
  1395                        #(#MenuItem
  1331                           #label: '-'
  1396                           #label: '-'
  1332                       )
  1397                       )
  1333                        #(#MenuItem
  1398                        #(#MenuItem
  1334                           #label: 'Pick Columns...'
  1399                           #label: 'Pick Columns...'
       
  1400                           #translateLabel: true
  1335                           #value: #doPickColumns
  1401                           #value: #doPickColumns
       
  1402                           #activeHelpKey: #pickColumns
  1336                       )
  1403                       )
  1337                        #(#MenuItem
  1404                        #(#MenuItem
  1338                           #label: '-'
  1405                           #label: '-'
  1339                       )
  1406                       )
  1340                        #(#MenuItem
  1407                        #(#MenuItem
  1341                           #label: 'Browse Class'
  1408                           #label: 'Browse Class'
       
  1409                           #translateLabel: true
  1342                           #value: #doBrowseClass
  1410                           #value: #doBrowseClass
  1343                           #activeHelpKey: #fileBrowseClass
  1411                           #activeHelpKey: #fileBrowseClass
  1344                       )
  1412                       )
  1345                        #(#MenuItem
  1413                        #(#MenuItem
  1346                           #label: '-'
  1414                           #label: '-'
  1355                     nil
  1423                     nil
  1356                 )
  1424                 )
  1357             )
  1425             )
  1358              #(#MenuItem
  1426              #(#MenuItem
  1359                 #label: 'Edit'
  1427                 #label: 'Edit'
       
  1428                 #translateLabel: true
  1360                 #activeHelpKey: #edit
  1429                 #activeHelpKey: #edit
  1361                 #submenuChannel: #menuEdit
  1430                 #submenuChannel: #menuEdit
  1362             )
  1431             )
  1363              #(#MenuItem
  1432              #(#MenuItem
  1364                 #label: 'Add'
  1433                 #label: 'Add'
       
  1434                 #translateLabel: true
  1365                 #submenu: 
  1435                 #submenu: 
  1366                  #(#Menu
  1436                  #(#Menu
  1367                     
  1437                     
  1368                      #(
  1438                      #(
  1369                        #(#MenuItem
  1439                        #(#MenuItem
  1370                           #label: 'Column'
  1440                           #label: 'Column'
       
  1441                           #translateLabel: true
  1371                           #value: #doCreateColumn
  1442                           #value: #doCreateColumn
  1372                           #activeHelpKey: #addColumn
  1443                           #activeHelpKey: #addColumn
  1373                           #enabled: #columnIsNotEditing
  1444                           #enabled: #columnIsNotEditing
  1374                           #labelImage: #(#ResourceRetriever nil #newColumnIcon)
  1445                           #labelImage: #(#ResourceRetriever nil #newColumnIcon 'Column')
  1375                       )
  1446                       )
  1376                     ) nil
  1447                     ) nil
  1377                     nil
  1448                     nil
  1378                 )
  1449                 )
  1379             )
  1450             )
  1380              #(#MenuItem
  1451              #(#MenuItem
  1381                 #label: 'Generate'
  1452                 #label: 'Generate'
  1382                 #activeHelpKey: #file
  1453                 #translateLabel: true
       
  1454                 #activeHelpKey: #generate
  1383                 #submenu: 
  1455                 #submenu: 
  1384                  #(#Menu
  1456                  #(#Menu
  1385                     
  1457                     
  1386                      #(
  1458                      #(
  1387                        #(#MenuItem
  1459                        #(#MenuItem
  1388                           #label: 'Define Row Class...'
  1460                           #label: 'Define Row Class...'
       
  1461                           #translateLabel: true
  1389                           #value: #doDefineRowClass
  1462                           #value: #doDefineRowClass
  1390                           #activeHelpKey: #fileDefineClass
  1463                           #activeHelpKey: #fileDefineClass
  1391                       )
  1464                       )
  1392                        #(#MenuItem
  1465                        #(#MenuItem
  1393                           #label: 'Browse Row Class'
  1466                           #label: 'Browse Row Class'
       
  1467                           #translateLabel: true
  1394                           #value: #doBrowseRowClass
  1468                           #value: #doBrowseRowClass
       
  1469                           #activeHelpKey: #browseRowClass
  1395                       )
  1470                       )
  1396                        #(#MenuItem
  1471                        #(#MenuItem
  1397                           #label: '-'
  1472                           #label: '-'
  1398                       )
  1473                       )
  1399                        #(#MenuItem
  1474                        #(#MenuItem
  1400                           #label: 'Generate Code'
  1475                           #label: 'Generate Code'
       
  1476                           #translateLabel: true
  1401                           #value: #doGenerateCode
  1477                           #value: #doGenerateCode
       
  1478                           #activeHelpKey: #generateCode
  1402                       )
  1479                       )
  1403                     ) nil
  1480                     ) nil
  1404                     nil
  1481                     nil
  1405                 )
  1482                 )
  1406             )
  1483             )
  1407              #(#MenuItem
  1484              #(#MenuItem
  1408                 #label: 'Settings'
  1485                 #label: 'Settings'
       
  1486                 #translateLabel: true
       
  1487                 #activeHelpKey: #settings
  1409                 #submenu: 
  1488                 #submenu: 
  1410                  #(#Menu
  1489                  #(#Menu
  1411                     
  1490                     
  1412                      #(
  1491                      #(
  1413                        #(#MenuItem
  1492                        #(#MenuItem
  1414                           #label: 'Fonts'
  1493                           #label: 'Fonts'
       
  1494                           #translateLabel: true
  1415                           #submenuChannel: #menuFont
  1495                           #submenuChannel: #menuFont
  1416                       )
  1496                       )
  1417                     ) nil
  1497                     ) nil
  1418                     nil
  1498                     nil
  1419                 )
  1499                 )
  1420             )
  1500             )
  1421              #(#MenuItem
  1501              #(#MenuItem
  1422                 #label: 'History'
  1502                 #label: 'History'
       
  1503                 #translateLabel: true
  1423                 #activeHelpKey: #history
  1504                 #activeHelpKey: #history
  1424                 #submenuChannel: #menuHistory
  1505                 #submenuChannel: #menuHistory
  1425             )
  1506             )
  1426              #(#MenuItem
  1507              #(#MenuItem
  1427                 #label: 'Help'
  1508                 #label: 'Help'
       
  1509                 #translateLabel: true
  1428                 #startGroup: #right
  1510                 #startGroup: #right
  1429                 #submenuChannel: #menuHelp
  1511                 #submenuChannel: #menuHelp
  1430             )
  1512             )
  1431           ) nil
  1513           ) nil
  1432           nil
  1514           nil
  1433       )
  1515       )
       
  1516 
       
  1517     "Modified: / 19.5.1998 / 23:10:01 / cg"
  1434 !
  1518 !
  1435 
  1519 
  1436 menuEdit
  1520 menuEdit
  1437     "This resource specification was automatically generated
  1521     "This resource specification was automatically generated
  1438      by the MenuEditor of ST/X."
  1522      by the MenuEditor of ST/X."
  1453           
  1537           
  1454            #(
  1538            #(
  1455              #(#MenuItem
  1539              #(#MenuItem
  1456                 #label: 'Cut'
  1540                 #label: 'Cut'
  1457                 #value: #doCut
  1541                 #value: #doCut
       
  1542                 #translateLabel: true
  1458                 #activeHelpKey: #editCut
  1543                 #activeHelpKey: #editCut
  1459                 #enabled: #isColumnSelected
  1544                 #enabled: #isColumnSelected
  1460             )
  1545             )
  1461              #(#MenuItem
  1546              #(#MenuItem
  1462                 #label: 'Copy'
  1547                 #label: 'Copy'
  1463                 #value: #doCopy
  1548                 #value: #doCopy
       
  1549                 #translateLabel: true
  1464                 #activeHelpKey: #editCopy
  1550                 #activeHelpKey: #editCopy
  1465                 #enabled: #isColumnSelected
  1551                 #enabled: #isColumnSelected
  1466             )
  1552             )
  1467              #(#MenuItem
  1553              #(#MenuItem
  1468                 #label: 'Paste'
  1554                 #label: 'Paste'
  1469                 #value: #doPaste
  1555                 #value: #doPaste
       
  1556                 #translateLabel: true
  1470                 #activeHelpKey: #editPaste
  1557                 #activeHelpKey: #editPaste
  1471                 #enabled: #valueOfHavingClipboard
  1558                 #enabled: #valueOfHavingClipboard
  1472             )
  1559             )
  1473              #(#MenuItem
  1560              #(#MenuItem
  1474                 #label: 'Delete'
  1561                 #label: 'Delete'
  1475                 #value: #doDelete
  1562                 #value: #doDelete
  1476                 #activeHelpKey: #editPaste
  1563                 #translateLabel: true
       
  1564                 #activeHelpKey: #editDelete
  1477                 #enabled: #valueOfHavingClipboard
  1565                 #enabled: #valueOfHavingClipboard
  1478             )
  1566             )
  1479              #(#MenuItem
  1567              #(#MenuItem
  1480                 #label: '-'
  1568                 #label: '-'
  1481             )
  1569             )
  1482              #(#MenuItem
  1570              #(#MenuItem
  1483                 #label: 'Move Up'
  1571                 #label: 'Move Up'
  1484                 #value: #doMoveColumn:
  1572                 #value: #doMoveColumn:
  1485                 #activeHelpKey: #editMoveUp
  1573                 #activeHelpKey: #editMoveUp
       
  1574                 #translateLabel: true
  1486                 #enabled: #isColumnSelected
  1575                 #enabled: #isColumnSelected
  1487                 #argument: #up
  1576                 #argument: #up
  1488                 #labelImage: #(#ResourceRetriever #DataSetBuilder #upIcon 'Move Up')
  1577                 #labelImage: #(#ResourceRetriever #DataSetBuilder #upIcon 'Move Up')
  1489             )
  1578             )
  1490              #(#MenuItem
  1579              #(#MenuItem
  1491                 #label: 'Move Down'
  1580                 #label: 'Move Down'
  1492                 #value: #doMoveColumn:
  1581                 #value: #doMoveColumn:
       
  1582                 #translateLabel: true
  1493                 #activeHelpKey: #editMoveDown
  1583                 #activeHelpKey: #editMoveDown
  1494                 #enabled: #isColumnSelected
  1584                 #enabled: #isColumnSelected
  1495                 #argument: #down
  1585                 #argument: #down
  1496                 #labelImage: #(#ResourceRetriever #DataSetBuilder #downIcon 'Move Down')
  1586                 #labelImage: #(#ResourceRetriever #DataSetBuilder #downIcon 'Move Down')
  1497             )
  1587             )
  1498           ) nil
  1588           ) nil
  1499           nil
  1589           nil
  1500       )
  1590       )
       
  1591 
       
  1592     "Modified: / 19.5.1998 / 23:10:19 / cg"
  1501 !
  1593 !
  1502 
  1594 
  1503 menuToolbar
  1595 menuToolbar
  1504     "This resource specification was automatically generated
  1596     "This resource specification was automatically generated
  1505      by the MenuEditor of ST/X."
  1597      by the MenuEditor of ST/X."