ImageEditor.st
changeset 519 085cf69fcd6c
parent 503 98b67511b1c0
child 535 1caf545614c5
equal deleted inserted replaced
518:435dcb241555 519:085cf69fcd6c
   261 )
   261 )
   262 ! !
   262 ! !
   263 
   263 
   264 !ImageEditor class methodsFor:'interface specs'!
   264 !ImageEditor class methodsFor:'interface specs'!
   265 
   265 
   266 menu
       
   267     "this window spec was automatically generated by the ST/X MenuEditor"
       
   268 
       
   269     "do not manually edit this - the builder may not be able to
       
   270      handle the specification if its corrupted."
       
   271 
       
   272     "
       
   273      MenuEditor new openOnClass:ImageEditor andSelector:#menu
       
   274      (Menu new fromLiteralArrayEncoding:(ImageEditor menu)) startUp
       
   275     "
       
   276 
       
   277     <resource: #menu>
       
   278 
       
   279     ^
       
   280      
       
   281        #(#Menu
       
   282           
       
   283            #(
       
   284              #(#MenuItem
       
   285                 #'label:' 'About'
       
   286                 #'labelImage:' #(#ResourceRetriever #ImageEditor #icon)
       
   287                 #'submenuChannel:' #menuAbout
       
   288             )
       
   289              #(#MenuItem
       
   290                 #'label:' 'File'
       
   291                 #'translateLabel:' true
       
   292                 #'submenu:' 
       
   293                  #(#Menu
       
   294                     
       
   295                      #(
       
   296                        #(#MenuItem
       
   297                           #'label:' 'New...'
       
   298                           #'value:' #newImage
       
   299                           #'activeHelpKey:' #fileNewImage
       
   300                       )
       
   301                        #(#MenuItem
       
   302                           #'label:' '-'
       
   303                       )
       
   304                        #(#MenuItem
       
   305                           #'label:' 'Load From File...'
       
   306                           #'value:' #loadFromFile
       
   307                           #'activeHelpKey:' #fileLoadFromFile
       
   308                       )
       
   309                        #(#MenuItem
       
   310                           #'label:' 'Load From Class...'
       
   311                           #'value:' #loadFromClass
       
   312                           #'activeHelpKey:' #fileLoadFromClass
       
   313                       )
       
   314                        #(#MenuItem
       
   315                           #'label:' '-'
       
   316                       )
       
   317                        #(#MenuItem
       
   318                           #'label:' 'Save'
       
   319                           #'value:' #saveImageFile
       
   320                           #'activeHelpKey:' #fileSaveFile
       
   321                           #'enabled:' #imageIsLoaded
       
   322                       )
       
   323                        #(#MenuItem
       
   324                           #'label:' 'Save As...'
       
   325                           #'value:' #saveImageFileAs
       
   326                           #'activeHelpKey:' #fileSaveAs
       
   327                           #'enabled:' #imageIsLoaded
       
   328                       )
       
   329                        #(#MenuItem
       
   330                           #'label:' 'Save Mask As...'
       
   331                           #'value:' #saveImageMaskFileAs
       
   332                           #'activeHelpKey:' #fileSaveMaskAs
       
   333                           #'enabled:' #imageIsLoaded
       
   334                       )
       
   335                        #(#MenuItem
       
   336                           #'label:' '-'
       
   337                       )
       
   338                        #(#MenuItem
       
   339                           #'label:' 'Save Method'
       
   340                           #'value:' #saveMethod
       
   341                           #'activeHelpKey:' #fileSaveMethod
       
   342                           #'enabled:' #imageIsLoaded
       
   343                       )
       
   344                        #(#MenuItem
       
   345                           #'label:' 'Save Method As...'
       
   346                           #'value:' #saveMethodAs
       
   347                           #'activeHelpKey:' #fileSaveMethodAs
       
   348                           #'enabled:' #imageIsLoaded
       
   349                       )
       
   350                        #(#MenuItem
       
   351                           #'label:' '-'
       
   352                       )
       
   353                        #(#MenuItem
       
   354                           #'label:' 'Print'
       
   355                           #'value:' #print
       
   356                           #'activeHelpKey:' #filePrint
       
   357                           #'enabled:' #imageIsLoaded
       
   358                       )
       
   359                        #(#MenuItem
       
   360                           #'label:' '-'
       
   361                       )
       
   362                        #(#MenuItem
       
   363                           #'label:' 'Browse Image Class'
       
   364                           #'value:' #browseClass
       
   365                           #'activeHelpKey:' #fileBrowseClass
       
   366                           #'enabled:' #imageIsLoaded
       
   367                       )
       
   368                        #(#MenuItem
       
   369                           #'label:' '-'
       
   370                       )
       
   371                        #(#MenuItem
       
   372                           #'label:' 'Exit'
       
   373                           #'translateLabel:' true
       
   374                           #'value:' #closeRequest
       
   375                           #'activeHelpKey:' #fileExit
       
   376                       )
       
   377                     ) nil
       
   378                     nil
       
   379                 )
       
   380             )
       
   381              #(#MenuItem
       
   382                 #'label:' 'Edit'
       
   383                 #'enabled:' #imageIsLoaded
       
   384                 #'submenu:' 
       
   385                  #(#Menu
       
   386                     
       
   387                      #(
       
   388                        #(#MenuItem
       
   389                           #'label:' 'Undo'
       
   390                           #'value:' #undo
       
   391                           #'activeHelpKey:' #editUndo
       
   392                       )
       
   393                        #(#MenuItem
       
   394                           #'label:' '-'
       
   395                       )
       
   396                        #(#MenuItem
       
   397                           #'label:' 'Flip - Vertical'
       
   398                           #'value:' #flipVertical
       
   399                           #'activeHelpKey:' #editFlipVertical
       
   400                       )
       
   401                        #(#MenuItem
       
   402                           #'label:' 'Flip - Horizontal'
       
   403                           #'value:' #flipHorizontal
       
   404                           #'activeHelpKey:' #editFlipHorizontal
       
   405                       )
       
   406                        #(#MenuItem
       
   407                           #'label:' '-'
       
   408                       )
       
   409                        #(#MenuItem
       
   410                           #'label:' 'Resize...'
       
   411                           #'value:' #resizeImage
       
   412                           #'activeHelpKey:' #editResize
       
   413                       )
       
   414                        #(#MenuItem
       
   415                           #'label:' 'Magnify...'
       
   416                           #'value:' #magnifyImage
       
   417                           #'activeHelpKey:' #editMagnifyImage
       
   418                       )
       
   419                        #(#MenuItem
       
   420                           #'label:' 'Rotate...'
       
   421                           #'value:' #rotateImage
       
   422                           #'activeHelpKey:' #editRotate
       
   423                       )
       
   424                        #(#MenuItem
       
   425                           #'label:' '-'
       
   426                       )
       
   427                        #(#MenuItem
       
   428                           #'label:' 'Negative'
       
   429                           #'value:' #negativeImage
       
   430                           #'activeHelpKey:' #editNegate
       
   431                       )
       
   432                     ) nil
       
   433                     nil
       
   434                 )
       
   435             )
       
   436              #(#MenuItem
       
   437                 #'label:' 'Color Map'
       
   438                 #'enabled:' #imageIsLoaded
       
   439                 #'submenu:' 
       
   440                  #(#Menu
       
   441                     
       
   442                      #(
       
   443                        #(#MenuItem
       
   444                           #'label:' '8-Plane'
       
   445                           #'activeHelpKey:' #colorMap
       
   446                           #'argument:' '8-plane'
       
   447                           #'indication:' #'colorMapMode:value:'
       
   448                       )
       
   449                        #(#MenuItem
       
   450                           #'label:' '4-Plane'
       
   451                           #'activeHelpKey:' #colorMap
       
   452                           #'argument:' '4-plane'
       
   453                           #'indication:' #'colorMapMode:value:'
       
   454                       )
       
   455                        #(#MenuItem
       
   456                           #'label:' '2-Plane'
       
   457                           #'activeHelpKey:' #colorMap
       
   458                           #'argument:' '2-plane'
       
   459                           #'indication:' #'colorMapMode:value:'
       
   460                       )
       
   461                        #(#MenuItem
       
   462                           #'label:' '1-Plane'
       
   463                           #'activeHelpKey:' #colorMap
       
   464                           #'argument:' '1-plane'
       
   465                           #'indication:' #'colorMapMode:value:'
       
   466                       )
       
   467                        #(#MenuItem
       
   468                           #'label:' '-'
       
   469                       )
       
   470                        #(#MenuItem
       
   471                           #'label:' '8-Plane + Mask'
       
   472                           #'activeHelpKey:' #colorMap
       
   473                           #'argument:' '8-plane + mask'
       
   474                           #'indication:' #'colorMapMode:value:'
       
   475                       )
       
   476                        #(#MenuItem
       
   477                           #'label:' '4-Plane + Mask'
       
   478                           #'activeHelpKey:' #colorMap
       
   479                           #'argument:' '4-plane + mask'
       
   480                           #'indication:' #'colorMapMode:value:'
       
   481                       )
       
   482                        #(#MenuItem
       
   483                           #'label:' '2-Plane + Mask'
       
   484                           #'activeHelpKey:' #colorMap
       
   485                           #'argument:' '2-plane + mask'
       
   486                           #'indication:' #'colorMapMode:value:'
       
   487                       )
       
   488                        #(#MenuItem
       
   489                           #'label:' '1-Plane + Mask'
       
   490                           #'activeHelpKey:' #colorMap
       
   491                           #'argument:' '1-plane + mask'
       
   492                           #'indication:' #'colorMapMode:value:'
       
   493                       )
       
   494                     ) nil
       
   495                     nil
       
   496                 )
       
   497             )
       
   498              #(#MenuItem
       
   499                 #'label:' 'History'
       
   500                 #'submenuChannel:' #menuHistory
       
   501             )
       
   502              #(#MenuItem
       
   503                 #'label:' 'Help'
       
   504                 #'submenuChannel:' #menuHelp
       
   505             )
       
   506           ) nil
       
   507           nil
       
   508       )
       
   509 !
       
   510 
       
   511 menuColorAssignment
       
   512     "this window spec was automatically generated by the ST/X MenuEditor"
       
   513 
       
   514     "do not manually edit this - the builder may not be able to
       
   515      handle the specification if its corrupted."
       
   516 
       
   517     "
       
   518      MenuEditor new openOnClass:ImageEditor andSelector:#menuColorAssignment
       
   519      (Menu new fromLiteralArrayEncoding:(ImageEditor menuColorAssignment)) startUp
       
   520     "
       
   521 
       
   522     <resource: #menu>
       
   523 
       
   524     ^
       
   525      
       
   526        #(#Menu
       
   527           
       
   528            #(
       
   529              #(#MenuItem
       
   530                 #'label:' 'left'
       
   531                 #'nameKey:' #leftMouseKeyButton
       
   532                 #'argument:' '1'
       
   533                 #'labelImage:' #(#ResourceRetriever nil #leftMouseKeyIcon)
       
   534                 #'indication:' #'mouseKeyColorMode:value:'
       
   535             )
       
   536              #(#MenuItem
       
   537                 #'label:' 'right'
       
   538                 #'nameKey:' #rightMouseKeyButton
       
   539                 #'argument:' '2'
       
   540                 #'labelImage:' #(#ResourceRetriever nil #rightMouseKeyIcon)
       
   541                 #'indication:' #'mouseKeyColorMode:value:'
       
   542             )
       
   543           ) nil
       
   544           nil
       
   545       )
       
   546 !
       
   547 
       
   548 menuToolbar
       
   549     "this window spec was automatically generated by the ST/X MenuEditor"
       
   550 
       
   551     "do not manually edit this - the builder may not be able to
       
   552      handle the specification if its corrupted."
       
   553 
       
   554     "
       
   555      MenuEditor new openOnClass:ImageEditor andSelector:#menuToolbar
       
   556      (Menu new fromLiteralArrayEncoding:(ImageEditor menuToolbar)) startUp
       
   557     "
       
   558 
       
   559     <resource: #menu>
       
   560 
       
   561     ^
       
   562      
       
   563        #(#Menu
       
   564           
       
   565            #(
       
   566              #(#MenuItem
       
   567                 #'label:' 'newImage'
       
   568                 #'isButton:' true
       
   569                 #'value:' #newImage
       
   570                 #'activeHelpKey:' #fileNewImage
       
   571                 #'labelImage:' #(#ResourceRetriever nil #newImageIcon)
       
   572             )
       
   573              #(#MenuItem
       
   574                 #'label:' 'loadFromClass'
       
   575                 #'isButton:' true
       
   576                 #'value:' #loadFromClass
       
   577                 #'activeHelpKey:' #fileLoadFromClass
       
   578                 #'labelImage:' #(#ResourceRetriever nil #loadFromClassIcon)
       
   579             )
       
   580              #(#MenuItem
       
   581                 #'label:' 'loadFromFile'
       
   582                 #'isButton:' true
       
   583                 #'value:' #loadFromFile
       
   584                 #'activeHelpKey:' #fileLoadFromFile
       
   585                 #'labelImage:' #(#ResourceRetriever nil #loadFromFileIcon)
       
   586             )
       
   587              #(#MenuItem
       
   588                 #'label:' '-'
       
   589             )
       
   590              #(#MenuItem
       
   591                 #'label:' 'saveMethod'
       
   592                 #'isButton:' true
       
   593                 #'value:' #saveMethod
       
   594                 #'activeHelpKey:' #fileSaveMethod
       
   595                 #'enabled:' #imageIsLoaded
       
   596                 #'labelImage:' #(#ResourceRetriever nil #saveAsMethodIcon)
       
   597             )
       
   598              #(#MenuItem
       
   599                 #'label:' 'saveFile'
       
   600                 #'isButton:' true
       
   601                 #'value:' #saveImageFile
       
   602                 #'activeHelpKey:' #fileSaveFile
       
   603                 #'enabled:' #imageIsLoaded
       
   604                 #'labelImage:' #(#ResourceRetriever nil #saveIcon)
       
   605             )
       
   606              #(#MenuItem
       
   607                 #'label:' '-'
       
   608             )
       
   609              #(#MenuItem
       
   610                 #'label:' 'Point'
       
   611                 #'activeHelpKey:' #drawModePoint
       
   612                 #'enabled:' #imageIsLoaded
       
   613                 #'argument:' 'point'
       
   614                 #'indication:' #'editMode:value:'
       
   615             )
       
   616              #(#MenuItem
       
   617                 #'label:' 'Box'
       
   618                 #'activeHelpKey:' #drawModeBox
       
   619                 #'enabled:' #imageIsLoaded
       
   620                 #'argument:' 'box'
       
   621                 #'indication:' #'editMode:value:'
       
   622             )
       
   623              #(#MenuItem
       
   624                 #'label:' 'Filled Box'
       
   625                 #'activeHelpKey:' #drawModeFilledBox
       
   626                 #'enabled:' #imageIsLoaded
       
   627                 #'argument:' 'filledBox'
       
   628                 #'indication:' #'editMode:value:'
       
   629             )
       
   630              #(#MenuItem
       
   631                 #'label:' 'Fill'
       
   632                 #'activeHelpKey:' #drawModeFill
       
   633                 #'enabled:' #imageIsLoaded
       
   634                 #'argument:' 'fill'
       
   635                 #'indication:' #'editMode:value:'
       
   636             )
       
   637              #(#MenuItem
       
   638                 #'label:' 'Copy'
       
   639                 #'activeHelpKey:' #drawModeCopy
       
   640                 #'enabled:' #imageIsLoaded
       
   641                 #'argument:' 'copy'
       
   642                 #'indication:' #'editMode:value:'
       
   643             )
       
   644              #(#MenuItem
       
   645                 #'label:' 'Paste'
       
   646                 #'activeHelpKey:' #drawModePaste
       
   647                 #'enabled:' #imageIsLoaded
       
   648                 #'argument:' 'paste'
       
   649                 #'indication:' #'editMode:value:'
       
   650             )
       
   651           ) nil
       
   652           nil
       
   653       )
       
   654 !
       
   655 
       
   656 windowSpec
   266 windowSpec
   657     "this window spec was automatically generated by the ST/X UIPainter"
   267     "this window spec was automatically generated by the ST/X UIPainter"
   658 
   268 
   659     "do not manually edit this - the painter/builder may not be able to
   269     "do not manually edit this - the painter/builder may not be able to
   660      handle the specification if its corrupted."
   270      handle the specification if its corrupted."
   671      
   281      
   672        #(#FullSpec
   282        #(#FullSpec
   673           #'window:' 
   283           #'window:' 
   674            #(#WindowSpec
   284            #(#WindowSpec
   675               #'name:' 'Image Editor'
   285               #'name:' 'Image Editor'
   676               #'layout:' #(#LayoutFrame 197 0 172 0 696 0 517 0)
   286               #'layout:' #(#LayoutFrame 423 0 357 0 922 0 702 0)
   677               #'label:' 'Image Editor'
   287               #'label:' 'Image Editor'
   678               #'min:' #(#Point 400 320)
   288               #'min:' #(#Point 400 320)
   679               #'max:' #(#Point 1152 900)
   289               #'max:' #(#Point 1152 900)
   680               #'bounds:' #(#Rectangle 197 172 697 518)
   290               #'bounds:' #(#Rectangle 423 357 923 703)
   681               #'menu:' #menu
   291               #'menu:' #menu
   682               #'usePreferredExtent:' false
   292               #'usePreferredExtent:' false
   683           )
   293           )
   684           #'component:' 
   294           #'component:' 
   685            #(#SpecCollection
   295            #(#SpecCollection
   774                                                   #'hasHorizontalScrollBar:' true
   384                                                   #'hasHorizontalScrollBar:' true
   775                                                   #'hasVerticalScrollBar:' true
   385                                                   #'hasVerticalScrollBar:' true
   776                                                   #'miniScrollerHorizontal:' true
   386                                                   #'miniScrollerHorizontal:' true
   777                                                   #'miniScrollerVertical:' true
   387                                                   #'miniScrollerVertical:' true
   778                                                   #'dataList:' #listOfColors
   388                                                   #'dataList:' #listOfColors
       
   389                                                   #'level:' -1
   779                                                   #'has3Dsepartors:' true
   390                                                   #'has3Dsepartors:' true
   780                                                   #'verticalSpacing:' 1
   391                                                   #'verticalSpacing:' 1
   781                                                   #'columns:' 
   392                                                   #'columns:' 
   782                                                    #(
   393                                                    #(
   783                                                      #(#DataSetColumnSpec
   394                                                      #(#DataSetColumnSpec
  1039               )
   650               )
  1040           )
   651           )
  1041       )
   652       )
  1042 ! !
   653 ! !
  1043 
   654 
       
   655 !ImageEditor class methodsFor:'menu specs'!
       
   656 
       
   657 menu
       
   658     "this window spec was automatically generated by the ST/X MenuEditor"
       
   659 
       
   660     "do not manually edit this - the builder may not be able to
       
   661      handle the specification if its corrupted."
       
   662 
       
   663     "
       
   664      MenuEditor new openOnClass:ImageEditor andSelector:#menu
       
   665      (Menu new fromLiteralArrayEncoding:(ImageEditor menu)) startUp
       
   666     "
       
   667 
       
   668     <resource: #menu>
       
   669 
       
   670     ^
       
   671      
       
   672        #(#Menu
       
   673           
       
   674            #(
       
   675              #(#MenuItem
       
   676                 #'label:' 'About'
       
   677                 #'labelImage:' #(#ResourceRetriever #ImageEditor #icon)
       
   678                 #'submenuChannel:' #menuAbout
       
   679             )
       
   680              #(#MenuItem
       
   681                 #'label:' 'File'
       
   682                 #'translateLabel:' true
       
   683                 #'submenu:' 
       
   684                  #(#Menu
       
   685                     
       
   686                      #(
       
   687                        #(#MenuItem
       
   688                           #'label:' 'New...'
       
   689                           #'value:' #newImage
       
   690                           #'activeHelpKey:' #fileNewImage
       
   691                       )
       
   692                        #(#MenuItem
       
   693                           #'label:' '-'
       
   694                       )
       
   695                        #(#MenuItem
       
   696                           #'label:' 'Load From File...'
       
   697                           #'value:' #loadFromFile
       
   698                           #'activeHelpKey:' #fileLoadFromFile
       
   699                       )
       
   700                        #(#MenuItem
       
   701                           #'label:' 'Load From Class...'
       
   702                           #'value:' #loadFromClass
       
   703                           #'activeHelpKey:' #fileLoadFromClass
       
   704                       )
       
   705                        #(#MenuItem
       
   706                           #'label:' '-'
       
   707                       )
       
   708                        #(#MenuItem
       
   709                           #'label:' 'Save'
       
   710                           #'value:' #saveImageFile
       
   711                           #'activeHelpKey:' #fileSaveFile
       
   712                           #'enabled:' #imageIsLoaded
       
   713                       )
       
   714                        #(#MenuItem
       
   715                           #'label:' 'Save As...'
       
   716                           #'value:' #saveImageFileAs
       
   717                           #'activeHelpKey:' #fileSaveAs
       
   718                           #'enabled:' #imageIsLoaded
       
   719                       )
       
   720                        #(#MenuItem
       
   721                           #'label:' 'Save Mask As...'
       
   722                           #'value:' #saveImageMaskFileAs
       
   723                           #'activeHelpKey:' #fileSaveMaskAs
       
   724                           #'enabled:' #imageIsLoaded
       
   725                       )
       
   726                        #(#MenuItem
       
   727                           #'label:' '-'
       
   728                       )
       
   729                        #(#MenuItem
       
   730                           #'label:' 'Save Method'
       
   731                           #'value:' #saveMethod
       
   732                           #'activeHelpKey:' #fileSaveMethod
       
   733                           #'enabled:' #imageIsLoaded
       
   734                       )
       
   735                        #(#MenuItem
       
   736                           #'label:' 'Save Method As...'
       
   737                           #'value:' #saveMethodAs
       
   738                           #'activeHelpKey:' #fileSaveMethodAs
       
   739                           #'enabled:' #imageIsLoaded
       
   740                       )
       
   741                        #(#MenuItem
       
   742                           #'label:' '-'
       
   743                       )
       
   744                        #(#MenuItem
       
   745                           #'label:' 'Print'
       
   746                           #'value:' #print
       
   747                           #'activeHelpKey:' #filePrint
       
   748                           #'enabled:' #imageIsLoaded
       
   749                       )
       
   750                        #(#MenuItem
       
   751                           #'label:' '-'
       
   752                       )
       
   753                        #(#MenuItem
       
   754                           #'label:' 'Browse Image Class'
       
   755                           #'value:' #browseClass
       
   756                           #'activeHelpKey:' #fileBrowseClass
       
   757                           #'enabled:' #imageIsLoaded
       
   758                       )
       
   759                        #(#MenuItem
       
   760                           #'label:' '-'
       
   761                       )
       
   762                        #(#MenuItem
       
   763                           #'label:' 'Exit'
       
   764                           #'translateLabel:' true
       
   765                           #'value:' #closeRequest
       
   766                           #'activeHelpKey:' #fileExit
       
   767                       )
       
   768                     ) nil
       
   769                     nil
       
   770                 )
       
   771             )
       
   772              #(#MenuItem
       
   773                 #'label:' 'Edit'
       
   774                 #'enabled:' #imageIsLoaded
       
   775                 #'submenu:' 
       
   776                  #(#Menu
       
   777                     
       
   778                      #(
       
   779                        #(#MenuItem
       
   780                           #'label:' 'Undo'
       
   781                           #'value:' #undo
       
   782                           #'activeHelpKey:' #editUndo
       
   783                       )
       
   784                        #(#MenuItem
       
   785                           #'label:' '-'
       
   786                       )
       
   787                        #(#MenuItem
       
   788                           #'label:' 'Flip - Vertical'
       
   789                           #'value:' #flipVertical
       
   790                           #'activeHelpKey:' #editFlipVertical
       
   791                       )
       
   792                        #(#MenuItem
       
   793                           #'label:' 'Flip - Horizontal'
       
   794                           #'value:' #flipHorizontal
       
   795                           #'activeHelpKey:' #editFlipHorizontal
       
   796                       )
       
   797                        #(#MenuItem
       
   798                           #'label:' '-'
       
   799                       )
       
   800                        #(#MenuItem
       
   801                           #'label:' 'Resize...'
       
   802                           #'value:' #resizeImage
       
   803                           #'activeHelpKey:' #editResize
       
   804                       )
       
   805                        #(#MenuItem
       
   806                           #'label:' 'Magnify...'
       
   807                           #'value:' #magnifyImage
       
   808                           #'activeHelpKey:' #editMagnifyImage
       
   809                       )
       
   810                        #(#MenuItem
       
   811                           #'label:' 'Rotate...'
       
   812                           #'value:' #rotateImage
       
   813                           #'activeHelpKey:' #editRotate
       
   814                       )
       
   815                        #(#MenuItem
       
   816                           #'label:' '-'
       
   817                       )
       
   818                        #(#MenuItem
       
   819                           #'label:' 'Negative'
       
   820                           #'value:' #negativeImage
       
   821                           #'activeHelpKey:' #editNegate
       
   822                       )
       
   823                     ) nil
       
   824                     nil
       
   825                 )
       
   826             )
       
   827              #(#MenuItem
       
   828                 #'label:' 'Color Map'
       
   829                 #'enabled:' #imageIsLoaded
       
   830                 #'submenu:' 
       
   831                  #(#Menu
       
   832                     
       
   833                      #(
       
   834                        #(#MenuItem
       
   835                           #'label:' '8-Plane'
       
   836                           #'activeHelpKey:' #colorMap
       
   837                           #'argument:' '8-plane'
       
   838                           #'indication:' #'colorMapMode:value:'
       
   839                       )
       
   840                        #(#MenuItem
       
   841                           #'label:' '4-Plane'
       
   842                           #'activeHelpKey:' #colorMap
       
   843                           #'argument:' '4-plane'
       
   844                           #'indication:' #'colorMapMode:value:'
       
   845                       )
       
   846                        #(#MenuItem
       
   847                           #'label:' '2-Plane'
       
   848                           #'activeHelpKey:' #colorMap
       
   849                           #'argument:' '2-plane'
       
   850                           #'indication:' #'colorMapMode:value:'
       
   851                       )
       
   852                        #(#MenuItem
       
   853                           #'label:' '1-Plane'
       
   854                           #'activeHelpKey:' #colorMap
       
   855                           #'argument:' '1-plane'
       
   856                           #'indication:' #'colorMapMode:value:'
       
   857                       )
       
   858                        #(#MenuItem
       
   859                           #'label:' '-'
       
   860                       )
       
   861                        #(#MenuItem
       
   862                           #'label:' '8-Plane + Mask'
       
   863                           #'activeHelpKey:' #colorMap
       
   864                           #'argument:' '8-plane + mask'
       
   865                           #'indication:' #'colorMapMode:value:'
       
   866                       )
       
   867                        #(#MenuItem
       
   868                           #'label:' '4-Plane + Mask'
       
   869                           #'activeHelpKey:' #colorMap
       
   870                           #'argument:' '4-plane + mask'
       
   871                           #'indication:' #'colorMapMode:value:'
       
   872                       )
       
   873                        #(#MenuItem
       
   874                           #'label:' '2-Plane + Mask'
       
   875                           #'activeHelpKey:' #colorMap
       
   876                           #'argument:' '2-plane + mask'
       
   877                           #'indication:' #'colorMapMode:value:'
       
   878                       )
       
   879                        #(#MenuItem
       
   880                           #'label:' '1-Plane + Mask'
       
   881                           #'activeHelpKey:' #colorMap
       
   882                           #'argument:' '1-plane + mask'
       
   883                           #'indication:' #'colorMapMode:value:'
       
   884                       )
       
   885                     ) nil
       
   886                     nil
       
   887                 )
       
   888             )
       
   889              #(#MenuItem
       
   890                 #'label:' 'History'
       
   891                 #'submenuChannel:' #menuHistory
       
   892             )
       
   893              #(#MenuItem
       
   894                 #'label:' 'Help'
       
   895                 #'submenuChannel:' #menuHelp
       
   896             )
       
   897           ) nil
       
   898           nil
       
   899       )
       
   900 !
       
   901 
       
   902 menuColorAssignment
       
   903     "this window spec was automatically generated by the ST/X MenuEditor"
       
   904 
       
   905     "do not manually edit this - the builder may not be able to
       
   906      handle the specification if its corrupted."
       
   907 
       
   908     "
       
   909      MenuEditor new openOnClass:ImageEditor andSelector:#menuColorAssignment
       
   910      (Menu new fromLiteralArrayEncoding:(ImageEditor menuColorAssignment)) startUp
       
   911     "
       
   912 
       
   913     <resource: #menu>
       
   914 
       
   915     ^
       
   916      
       
   917        #(#Menu
       
   918           
       
   919            #(
       
   920              #(#MenuItem
       
   921                 #'label:' 'left'
       
   922                 #'nameKey:' #leftMouseKeyButton
       
   923                 #'argument:' '1'
       
   924                 #'labelImage:' #(#ResourceRetriever nil #leftMouseKeyIcon)
       
   925                 #'indication:' #'mouseKeyColorMode:value:'
       
   926             )
       
   927              #(#MenuItem
       
   928                 #'label:' 'right'
       
   929                 #'nameKey:' #rightMouseKeyButton
       
   930                 #'argument:' '2'
       
   931                 #'labelImage:' #(#ResourceRetriever nil #rightMouseKeyIcon)
       
   932                 #'indication:' #'mouseKeyColorMode:value:'
       
   933             )
       
   934           ) nil
       
   935           nil
       
   936       )
       
   937 !
       
   938 
       
   939 menuToolbar
       
   940     "this window spec was automatically generated by the ST/X MenuEditor"
       
   941 
       
   942     "do not manually edit this - the builder may not be able to
       
   943      handle the specification if its corrupted."
       
   944 
       
   945     "
       
   946      MenuEditor new openOnClass:ImageEditor andSelector:#menuToolbar
       
   947      (Menu new fromLiteralArrayEncoding:(ImageEditor menuToolbar)) startUp
       
   948     "
       
   949 
       
   950     <resource: #menu>
       
   951 
       
   952     ^
       
   953      
       
   954        #(#Menu
       
   955           
       
   956            #(
       
   957              #(#MenuItem
       
   958                 #'label:' 'newImage'
       
   959                 #'isButton:' true
       
   960                 #'value:' #newImage
       
   961                 #'activeHelpKey:' #fileNewImage
       
   962                 #'labelImage:' #(#ResourceRetriever nil #newImageIcon)
       
   963             )
       
   964              #(#MenuItem
       
   965                 #'label:' 'loadFromClass'
       
   966                 #'isButton:' true
       
   967                 #'value:' #loadFromClass
       
   968                 #'activeHelpKey:' #fileLoadFromClass
       
   969                 #'labelImage:' #(#ResourceRetriever nil #loadFromClassIcon)
       
   970             )
       
   971              #(#MenuItem
       
   972                 #'label:' 'loadFromFile'
       
   973                 #'isButton:' true
       
   974                 #'value:' #loadFromFile
       
   975                 #'activeHelpKey:' #fileLoadFromFile
       
   976                 #'labelImage:' #(#ResourceRetriever nil #loadFromFileIcon)
       
   977             )
       
   978              #(#MenuItem
       
   979                 #'label:' ''
       
   980             )
       
   981              #(#MenuItem
       
   982                 #'label:' 'saveMethod'
       
   983                 #'isButton:' true
       
   984                 #'value:' #saveMethod
       
   985                 #'activeHelpKey:' #fileSaveMethod
       
   986                 #'enabled:' #imageIsLoaded
       
   987                 #'labelImage:' #(#ResourceRetriever nil #saveAsMethodIcon)
       
   988             )
       
   989              #(#MenuItem
       
   990                 #'label:' 'saveFile'
       
   991                 #'isButton:' true
       
   992                 #'value:' #saveImageFile
       
   993                 #'activeHelpKey:' #fileSaveFile
       
   994                 #'enabled:' #imageIsLoaded
       
   995                 #'labelImage:' #(#ResourceRetriever nil #saveIcon)
       
   996             )
       
   997              #(#MenuItem
       
   998                 #'label:' ''
       
   999             )
       
  1000              #(#MenuItem
       
  1001                 #'label:' 'Point'
       
  1002                 #'activeHelpKey:' #drawModePoint
       
  1003                 #'enabled:' #imageIsLoaded
       
  1004                 #'argument:' 'point'
       
  1005                 #'indication:' #'editMode:value:'
       
  1006             )
       
  1007              #(#MenuItem
       
  1008                 #'label:' 'Box'
       
  1009                 #'activeHelpKey:' #drawModeBox
       
  1010                 #'enabled:' #imageIsLoaded
       
  1011                 #'argument:' 'box'
       
  1012                 #'indication:' #'editMode:value:'
       
  1013             )
       
  1014              #(#MenuItem
       
  1015                 #'label:' 'Filled Box'
       
  1016                 #'activeHelpKey:' #drawModeFilledBox
       
  1017                 #'enabled:' #imageIsLoaded
       
  1018                 #'argument:' 'filledBox'
       
  1019                 #'indication:' #'editMode:value:'
       
  1020             )
       
  1021              #(#MenuItem
       
  1022                 #'label:' 'Fill'
       
  1023                 #'activeHelpKey:' #drawModeFill
       
  1024                 #'enabled:' #imageIsLoaded
       
  1025                 #'argument:' 'fill'
       
  1026                 #'indication:' #'editMode:value:'
       
  1027             )
       
  1028              #(#MenuItem
       
  1029                 #'label:' 'Copy'
       
  1030                 #'activeHelpKey:' #drawModeCopy
       
  1031                 #'enabled:' #imageIsLoaded
       
  1032                 #'argument:' 'copy'
       
  1033                 #'indication:' #'editMode:value:'
       
  1034             )
       
  1035              #(#MenuItem
       
  1036                 #'label:' 'Paste'
       
  1037                 #'activeHelpKey:' #drawModePaste
       
  1038                 #'enabled:' #imageIsLoaded
       
  1039                 #'argument:' 'paste'
       
  1040                 #'indication:' #'editMode:value:'
       
  1041             )
       
  1042           ) nil
       
  1043           nil
       
  1044       )
       
  1045 ! !
       
  1046 
  1044 !ImageEditor class methodsFor:'resources'!
  1047 !ImageEditor class methodsFor:'resources'!
  1045 
  1048 
  1046 leftMouseKeyIcon
  1049 leftMouseKeyIcon
  1047     "Generated by the Image Editor"
  1050     "Generated by the Image Editor"
  1048     "
  1051     "