ImageEditor.st
changeset 3407 2e0024e012e9
parent 3405 02c67d9a5e65
child 3408 86d2e0cd4970
equal deleted inserted replaced
3406:a5efdd192b3e 3407:2e0024e012e9
   941     <resource: #image>
   941     <resource: #image>
   942 
   942 
   943     ^Icon
   943     ^Icon
   944         constantNamed:'ImageEditor class maskOutsideCircleIcon'
   944         constantNamed:'ImageEditor class maskOutsideCircleIcon'
   945         ifAbsentPut:[(Depth1Image width:14 height:14) bits:(ByteArray fromPackedString:'??3??O1=<A3 CN@L0@S@AL@G8@3 CO@\?G3??@@a')
   945         ifAbsentPut:[(Depth1Image width:14 height:14) bits:(ByteArray fromPackedString:'??3??O1=<A3 CN@L0@S@AL@G8@3 CO@\?G3??@@a')
   946             colorMapFromArray:#[0 0 0 255 0 0]
   946             colorMapFromArray:#[0 0 0 255 127 127]
   947             mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a'); yourself); yourself]
   947             mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a'); yourself); yourself]
   948 !
   948 !
   949 
   949 
   950 maskOutsideRectangleIcon
   950 maskOutsideRectangleIcon
   951     "This resource specification was automatically generated
   951     "This resource specification was automatically generated
   963     <resource: #image>
   963     <resource: #image>
   964 
   964 
   965     ^Icon
   965     ^Icon
   966         constantNamed:'ImageEditor class maskOutsideRectangleIcon'
   966         constantNamed:'ImageEditor class maskOutsideRectangleIcon'
   967         ifAbsentPut:[(Depth1Image width:14 height:14) bits:(ByteArray fromPackedString:'??3??L@M0@3@CL@L0@3@CL@L0@3@CL@L??7??@@a')
   967         ifAbsentPut:[(Depth1Image width:14 height:14) bits:(ByteArray fromPackedString:'??3??L@M0@3@CL@L0@3@CL@L0@3@CL@L??7??@@a')
   968             colorMapFromArray:#[0 0 0 255 0 0]
   968             colorMapFromArray:#[0 0 0 255 127 127]
   969             mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a'); yourself); yourself]
   969             mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a'); yourself); yourself]
   970 !
   970 !
   971 
   971 
   972 pasteIcon
   972 pasteIcon
   973     <resource: #image>
   973     <resource: #image>
  4406             changedColor := changedObject at:aParameter.
  4406             changedColor := changedObject at:aParameter.
  4407             drawingColormap notNil ifTrue:[
  4407             drawingColormap notNil ifTrue:[
  4408                 drawingColormap at:clrIndex put:changedColor.
  4408                 drawingColormap at:clrIndex put:changedColor.
  4409             ].
  4409             ].
  4410             cMap := image colorMap.
  4410             cMap := image colorMap.
  4411             (cMap notNil and:[cMap isMappedPalette not and:[cMap isFixedPalette not]]) ifTrue:[
  4411             (cMap notNil and:[cMap isFixedPalette not]) ifTrue:[
  4412                 image colorMap at:clrIndex put:changedColor.
  4412                 image colorMap at:clrIndex put:changedColor.
  4413                 self colorMapChanged.
  4413                 self colorMapChanged.
  4414             ].
  4414             ].
  4415             ^ self
  4415             ^ self
  4416         ].
  4416         ].
  4472         ^ self.
  4472         ^ self.
  4473     ].
  4473     ].
  4474 
  4474 
  4475     super update:something with:aParameter from:changedObject
  4475     super update:something with:aParameter from:changedObject
  4476 
  4476 
  4477     "Modified: / 03-02-2017 / 21:52:33 / cg"
  4477     "Modified (comment): / 17-02-2017 / 14:28:01 / cg"
  4478     "Modified (format): / 16-02-2017 / 10:20:18 / cg"
       
  4479 !
  4478 !
  4480 
  4479 
  4481 updateAfterImageChange
  4480 updateAfterImageChange
  4482     |img|
  4481     |img|
  4483 
  4482