MenuEditor.st
changeset 381 1d1b1483270c
parent 371 7017eaabd9ed
child 382 2a46018227a1
equal deleted inserted replaced
380:42aacfc3d263 381:1d1b1483270c
   884      
   884      
   885        #(#FullSpec
   885        #(#FullSpec
   886           #'window:' 
   886           #'window:' 
   887            #(#WindowSpec
   887            #(#WindowSpec
   888               #'name:' 'unnamed canvas'
   888               #'name:' 'unnamed canvas'
   889               #'layout:' #(#LayoutFrame 219 0 193 0 485 0 511 0)
   889               #'layout:' #(#LayoutFrame 377 0 282 0 643 0 600 0)
   890               #'label:' 'unnamed canvas'
   890               #'label:' 'unnamed canvas'
   891               #'min:' #(#Point 10 10)
   891               #'min:' #(#Point 10 10)
   892               #'max:' #(#Point 1160 870)
   892               #'max:' #(#Point 1160 870)
   893               #'bounds:' #(#Rectangle 219 193 486 512)
   893               #'bounds:' #(#Rectangle 377 282 644 601)
   894               #'usePreferredExtent:' false
   894               #'usePreferredExtent:' false
   895           )
   895           )
   896           #'component:' 
   896           #'component:' 
   897            #(#SpecCollection
   897            #(#SpecCollection
   898               #'collection:' 
   898               #'collection:' 
   926                     #'tabable:' true
   926                     #'tabable:' true
   927                     #'model:' #label
   927                     #'model:' #label
   928                 )
   928                 )
   929                  #(#LabelSpec
   929                  #(#LabelSpec
   930                     #'name:' 'valueLabel'
   930                     #'name:' 'valueLabel'
   931                     #'layout:' #(#AlignmentOrigin 87 0 94 0 1 0.5)
   931                     #'layout:' #(#AlignmentOrigin 87 0 90 0 1 0.5)
   932                     #'label:' 'Value:'
   932                     #'label:' 'Value:'
   933                     #'adjust:' #right
   933                     #'adjust:' #right
   934                     #'resizeForLabel:' true
   934                     #'resizeForLabel:' true
   935                 )
   935                 )
   936                  #(#InputFieldSpec
   936                  #(#InputFieldSpec
   937                     #'name:' 'valueField'
   937                     #'name:' 'valueField'
   938                     #'layout:' #(#LayoutFrame 91 0 83 0 0 1.0 105 0)
   938                     #'layout:' #(#LayoutFrame 91 0 79 0 0 1.0 101 0)
   939                     #'activeHelpKey:' #value
   939                     #'activeHelpKey:' #value
   940                     #'tabable:' true
   940                     #'tabable:' true
   941                     #'model:' #value
   941                     #'model:' #value
   942                     #'type:' #symbolOrNil
   942                     #'type:' #symbolOrNil
   943                 )
   943                 )
   944                  #(#LabelSpec
   944                  #(#LabelSpec
   945                     #'name:' 'argumentLabel'
   945                     #'name:' 'argumentLabel'
   946                     #'layout:' #(#AlignmentOrigin 87 0 120 0 1 0.5)
   946                     #'layout:' #(#AlignmentOrigin 87 0 116 0 1 0.5)
   947                     #'label:' 'Argument:'
   947                     #'label:' 'Argument:'
   948                     #'adjust:' #right
   948                     #'adjust:' #right
   949                     #'resizeForLabel:' true
   949                     #'resizeForLabel:' true
   950                 )
   950                 )
   951                  #(#InputFieldSpec
   951                  #(#InputFieldSpec
   952                     #'name:' 'argumentField'
   952                     #'name:' 'argumentField'
   953                     #'layout:' #(#LayoutFrame 91 0 109 0 0 1.0 131 0)
   953                     #'layout:' #(#LayoutFrame 91 0 105 0 0 1.0 127 0)
   954                     #'activeHelpKey:' #argument
   954                     #'activeHelpKey:' #argument
   955                     #'tabable:' true
   955                     #'tabable:' true
   956                     #'model:' #argument
   956                     #'model:' #argument
   957                     #'type:' #string
   957                     #'type:' #string
   958                 )
   958                 )
   959                  #(#LabelSpec
   959                  #(#LabelSpec
   960                     #'name:' 'indicationLabel'
   960                     #'name:' 'indicationLabel'
   961                     #'layout:' #(#AlignmentOrigin 87 0 160 0 1 0.5)
   961                     #'layout:' #(#AlignmentOrigin 87 0 156 0 1 0.5)
   962                     #'label:' 'Indication:'
   962                     #'label:' 'Indication:'
   963                     #'adjust:' #right
   963                     #'adjust:' #right
   964                     #'resizeForLabel:' true
   964                     #'resizeForLabel:' true
   965                 )
   965                 )
   966                  #(#InputFieldSpec
   966                  #(#InputFieldSpec
   967                     #'name:' 'indicationField'
   967                     #'name:' 'indicationField'
   968                     #'layout:' #(#LayoutFrame 91 0 149 0 0 1.0 171 0)
   968                     #'layout:' #(#LayoutFrame 91 0 145 0 0 1.0 167 0)
   969                     #'activeHelpKey:' #indication
   969                     #'activeHelpKey:' #indication
   970                     #'tabable:' true
   970                     #'tabable:' true
   971                     #'model:' #indication
   971                     #'model:' #indication
   972                     #'type:' #symbolOrNil
   972                     #'type:' #symbolOrNil
   973                 )
   973                 )
  1313      
  1313      
  1314        #(#FullSpec
  1314        #(#FullSpec
  1315           #'window:' 
  1315           #'window:' 
  1316            #(#WindowSpec
  1316            #(#WindowSpec
  1317               #'name:' 'unnamed canvas'
  1317               #'name:' 'unnamed canvas'
  1318               #'layout:' #(#LayoutFrame 219 0 193 0 463 0 334 0)
  1318               #'layout:' #(#LayoutFrame 441 0 301 0 685 0 442 0)
  1319               #'label:' 'unnamed canvas'
  1319               #'label:' 'unnamed canvas'
  1320               #'min:' #(#Point 10 10)
  1320               #'min:' #(#Point 10 10)
  1321               #'max:' #(#Point 1280 1024)
  1321               #'max:' #(#Point 1280 1024)
  1322               #'bounds:' #(#Rectangle 219 193 464 335)
  1322               #'bounds:' #(#Rectangle 441 301 686 443)
  1323               #'usePreferredExtent:' false
  1323               #'usePreferredExtent:' false
  1324           )
  1324           )
  1325           #'component:' 
  1325           #'component:' 
  1326            #(#SpecCollection
  1326            #(#SpecCollection
  1327               #'collection:' 
  1327               #'collection:' 
  1356                     #'model:' #icon
  1356                     #'model:' #icon
  1357                     #'type:' #symbolOrNil
  1357                     #'type:' #symbolOrNil
  1358                 )
  1358                 )
  1359                  #(#CheckBoxSpec
  1359                  #(#CheckBoxSpec
  1360                     #'name:' 'iconAndLabel'
  1360                     #'name:' 'iconAndLabel'
  1361                     #'layout:' #(#LayoutOrigin 15 0 85 0)
  1361                     #'layout:' #(#LayoutOrigin 15 0 103 0)
  1362                     #'activeHelpKey:' #iconAndLabel
  1362                     #'activeHelpKey:' #iconAndLabel
  1363                     #'tabable:' true
  1363                     #'tabable:' true
  1364                     #'model:' #iconAndLabel
  1364                     #'model:' #iconAndLabel
  1365                     #'label:' 'Icon & Label'
  1365                     #'label:' 'Icon & Label'
       
  1366                 )
       
  1367                  #(#ActionButtonSpec
       
  1368                     #'name:' 'imageEditorButton'
       
  1369                     #'layout:' #(#LayoutFrame 81 0 65 0 0 1 87 0)
       
  1370                     #'label:' 'Image Editor'
       
  1371                     #'model:' #doEditImage
  1366                 )
  1372                 )
  1367               )
  1373               )
  1368           )
  1374           )
  1369       )
  1375       )
  1370 ! !
  1376 ! !
  1891         self specClass:((aspects at:#classNameChannel) value)
  1897         self specClass:((aspects at:#classNameChannel) value)
  1892     ].
  1898     ].
  1893 
  1899 
  1894 !
  1900 !
  1895 
  1901 
       
  1902 doEditImage
       
  1903 
       
  1904     ImageEditor open loadFromMessage: ((aspects at:#retriever) value ? specClass) , ' ', ((aspects at:#icon) value ? '')
       
  1905 !
       
  1906 
  1896 doFromClass
  1907 doFromClass
  1897 
  1908 
  1898     aspects at:#classNameChannel  put:(self specClass asValue).
  1909     aspects at:#classNameChannel  put:(self specClass asValue).
  1899     aspects at:#methodNameChannel put:(self painter selectorName asValue).
  1910     aspects at:#methodNameChannel put:(self painter selectorName asValue).
  1900 
  1911