DataSetBuilder.st
changeset 550 35cffcc6036e
parent 545 25a3072fd268
child 554 34ceed6455fa
equal deleted inserted replaced
549:454a490d797f 550:35cffcc6036e
    67     "
    67     "
    68     UIHelpTool openOnClass:DataSetBuilder    
    68     UIHelpTool openOnClass:DataSetBuilder    
    69     "
    69     "
    70 
    70 
    71   ^ super helpSpec addPairsFrom:#(
    71   ^ super helpSpec addPairsFrom:#(
       
    72 
       
    73 #addColumn
       
    74 'Adds a new column.'
    72 
    75 
    73 #backgroundColor
    76 #backgroundColor
    74 'Sets the background color of the column if the color-checkBox is turned on. Otherwise, the column uses its default background color (which is specified in the styleSheet).'
    77 'Sets the background color of the column if the color-checkBox is turned on. Otherwise, the column uses its default background color (which is specified in the styleSheet).'
    75 
    78 
    76 #backgroundSelector
    79 #backgroundSelector
  1149                           #'label:' '-'
  1152                           #'label:' '-'
  1150                       )
  1153                       )
  1151                        #(#MenuItem
  1154                        #(#MenuItem
  1152                           #'label:' 'Exit'
  1155                           #'label:' 'Exit'
  1153                           #'value:' #closeRequest
  1156                           #'value:' #closeRequest
       
  1157                           #'activeHelpKey:' #fileExit
  1154                       )
  1158                       )
  1155                     ) nil
  1159                     ) nil
  1156                     nil
  1160                     nil
  1157                 )
  1161                 )
  1158             )
  1162             )
  1167                     
  1171                     
  1168                      #(
  1172                      #(
  1169                        #(#MenuItem
  1173                        #(#MenuItem
  1170                           #'label:' 'Column'
  1174                           #'label:' 'Column'
  1171                           #'value:' #doCreateColumn
  1175                           #'value:' #doCreateColumn
       
  1176                           #'activeHelpKey:' #addColumn
  1172                           #'enabled:' #columnIsNotEditing
  1177                           #'enabled:' #columnIsNotEditing
  1173                           #'labelImage:' #(#ResourceRetriever nil #newColumnIcon 'Column')
  1178                           #'labelImage:' #(#ResourceRetriever nil #newColumnIcon 'Column')
  1174                       )
  1179                       )
  1175                     ) nil
  1180                     ) nil
  1176                     nil
  1181                     nil
  1205           
  1210           
  1206            #(
  1211            #(
  1207              #(#MenuItem
  1212              #(#MenuItem
  1208                 #'label:' 'Cut'
  1213                 #'label:' 'Cut'
  1209                 #'value:' #doCutColumn
  1214                 #'value:' #doCutColumn
       
  1215                 #'activeHelpKey:' #editCut
  1210                 #'enabled:' #isColumnSelected
  1216                 #'enabled:' #isColumnSelected
  1211             )
  1217             )
  1212              #(#MenuItem
  1218              #(#MenuItem
  1213                 #'label:' 'Copy'
  1219                 #'label:' 'Copy'
  1214                 #'value:' #doCopyColumn
  1220                 #'value:' #doCopyColumn
       
  1221                 #'activeHelpKey:' #editCopy
  1215                 #'enabled:' #isColumnSelected
  1222                 #'enabled:' #isColumnSelected
  1216             )
  1223             )
  1217              #(#MenuItem
  1224              #(#MenuItem
  1218                 #'label:' 'Paste'
  1225                 #'label:' 'Paste'
  1219                 #'value:' #doPasteColumn
  1226                 #'value:' #doPasteColumn
       
  1227                 #'activeHelpKey:' #editPaste
  1220                 #'enabled:' #valueOfHavingClipboard
  1228                 #'enabled:' #valueOfHavingClipboard
  1221             )
  1229             )
  1222              #(#MenuItem
  1230              #(#MenuItem
  1223                 #'label:' '-'
  1231                 #'label:' '-'
  1224             )
  1232             )
  1225              #(#MenuItem
  1233              #(#MenuItem
  1226                 #'label:' 'Move Up'
  1234                 #'label:' 'Move Up'
  1227                 #'value:' #'doMoveColumn:'
  1235                 #'value:' #'doMoveColumn:'
       
  1236                 #'activeHelpKey:' #editMoveUp
  1228                 #'enabled:' #isColumnSelected
  1237                 #'enabled:' #isColumnSelected
  1229                 #'argument:' #up
  1238                 #'argument:' #up
  1230                 #'labelImage:' #(#ResourceRetriever #DataSetBuilder #upIcon 'Move Up')
  1239                 #'labelImage:' #(#ResourceRetriever #DataSetBuilder #upIcon 'Move Up')
  1231             )
  1240             )
  1232              #(#MenuItem
  1241              #(#MenuItem
  1233                 #'label:' 'Move Down'
  1242                 #'label:' 'Move Down'
  1234                 #'value:' #'doMoveColumn:'
  1243                 #'value:' #'doMoveColumn:'
       
  1244                 #'activeHelpKey:' #editMoveDown
  1235                 #'enabled:' #isColumnSelected
  1245                 #'enabled:' #isColumnSelected
  1236                 #'argument:' #down
  1246                 #'argument:' #down
  1237                 #'labelImage:' #(#ResourceRetriever #DataSetBuilder #downIcon 'Move Down')
  1247                 #'labelImage:' #(#ResourceRetriever #DataSetBuilder #downIcon 'Move Down')
  1238             )
  1248             )
  1239           ) nil
  1249           ) nil
  1258      
  1268      
  1259        #(#Menu
  1269        #(#Menu
  1260           
  1270           
  1261            #(
  1271            #(
  1262              #(#MenuItem
  1272              #(#MenuItem
  1263                 #'label:' 'Create Column'
  1273                 #'label:' 'Add Column'
  1264                 #'isButton:' true
  1274                 #'isButton:' true
  1265                 #'value:' #doCreateColumn
  1275                 #'value:' #doCreateColumn
       
  1276                 #'activeHelpKey:' #addColumn
  1266                 #'enabled:' #columnIsNotEditing
  1277                 #'enabled:' #columnIsNotEditing
  1267                 #'labelImage:' #(#ResourceRetriever nil #newColumnIcon)
  1278                 #'labelImage:' #(#ResourceRetriever nil #newColumnIcon)
  1268             )
  1279             )
  1269              #(#MenuItem
  1280              #(#MenuItem
  1270                 #'label:' ''
  1281                 #'label:' ''
  1271             )
  1282             )
  1272              #(#MenuItem
  1283              #(#MenuItem
  1273                 #'label:' 'Step Up'
  1284                 #'label:' 'Move Up'
  1274                 #'isButton:' true
  1285                 #'isButton:' true
  1275                 #'value:' #'doMoveColumn:'
  1286                 #'value:' #'doMoveColumn:'
       
  1287                 #'activeHelpKey:' #editMoveUp
  1276                 #'enabled:' #isColumnSelected
  1288                 #'enabled:' #isColumnSelected
  1277                 #'argument:' #up
  1289                 #'argument:' #up
  1278                 #'labelImage:' #(#ResourceRetriever nil #upIcon)
  1290                 #'labelImage:' #(#ResourceRetriever nil #upIcon)
  1279             )
  1291             )
  1280              #(#MenuItem
  1292              #(#MenuItem
  1281                 #'label:' 'Step Down'
  1293                 #'label:' 'Move Down'
  1282                 #'isButton:' true
  1294                 #'isButton:' true
  1283                 #'value:' #'doMoveColumn:'
  1295                 #'value:' #'doMoveColumn:'
       
  1296                 #'activeHelpKey:' #editMoveDown
  1284                 #'enabled:' #isColumnSelected
  1297                 #'enabled:' #isColumnSelected
  1285                 #'argument:' #down
  1298                 #'argument:' #down
  1286                 #'labelImage:' #(#ResourceRetriever nil #downIcon)
  1299                 #'labelImage:' #(#ResourceRetriever nil #downIcon)
  1287             )
  1300             )
  1288           ) nil
  1301           ) nil