ImageEditor.st
changeset 475 0d5a50fe59f4
parent 468 bb4e776b9210
child 487 6c336c183330
equal deleted inserted replaced
474:7b19423c8b79 475:0d5a50fe59f4
  1112 resourceSelectorInputField
  1112 resourceSelectorInputField
  1113 
  1113 
  1114     ^builder componentAt: #resourceSelectorInputField
  1114     ^builder componentAt: #resourceSelectorInputField
  1115 ! !
  1115 ! !
  1116 
  1116 
       
  1117 !ImageEditor methodsFor:'active help'!
       
  1118 
       
  1119 defaultInfoLabel
       
  1120 
       
  1121     |usedColors|
       
  1122     self image isNil ifTrue: [^'No image defined'].
       
  1123     self image colorMap isNil ifTrue: [usedColors := '?'] ifFalse: [usedColors := self image usedColors size].
       
  1124     ^self image width printString, 'x',
       
  1125         self image height printString, 'x',
       
  1126         (2 raisedTo: self image depth) printString,
       
  1127         (self image mask notNil ifTrue: [' (mask + '] ifFalse: ['(']),
       
  1128         usedColors printString,
       
  1129         ' used colors)'
       
  1130 
       
  1131 ! !
       
  1132 
  1117 !ImageEditor methodsFor:'aspects'!
  1133 !ImageEditor methodsFor:'aspects'!
  1118 
  1134 
  1119 imageIsLoaded
  1135 imageIsLoaded
  1120 
  1136 
  1121     |holder|
  1137     |holder|
  1364 
  1380 
  1365 !
  1381 !
  1366 
  1382 
  1367 updateInfoLabel
  1383 updateInfoLabel
  1368 
  1384 
  1369     |usedColors|
  1385     self valueOfInfoLabel value: self defaultInfoLabel
  1370     self image colorMap isNil ifTrue: [usedColors := '?'] ifFalse: [usedColors := self image usedColors size].
       
  1371     self valueOfInfoLabel value:
       
  1372         self image width printString, 'x',
       
  1373         self image height printString, 'x',
       
  1374         (2 raisedTo: self image depth) printString,
       
  1375         (self image mask notNil ifTrue: [' (mask + '] ifFalse: ['(']),
       
  1376         usedColors printString,
       
  1377         ' used colors)'
       
  1378 
       
  1379 
  1386 
  1380 !
  1387 !
  1381 
  1388 
  1382 updateInputFields
  1389 updateInputFields
  1383 
  1390