#UI_ENHANCEMENT by expecco draft
authorClaus Gittinger <cg@exept.de>
Wed, 12 Apr 2017 15:58:35 +0200
changeset 3442 01fc9215d9c2
parent 3441 40faf7657f15
child 3443 b9d9eb4b34f9
#UI_ENHANCEMENT by expecco class: ImageEditor class changed: #circleIcon #specialCircleIcon #specialRectangleIcon
ImageEditor.st
--- a/ImageEditor.st	Wed Apr 12 09:34:34 2017 +0200
+++ b/ImageEditor.st	Wed Apr 12 15:58:35 2017 +0200
@@ -650,35 +650,25 @@
 !
 
 circleIcon
-    <resource: #image>
     "This resource specification was automatically generated
      by the ImageEditor of ST/X."
+
     "Do not manually edit this!! If it is corrupted,
      the ImageEditor may not be able to read the specification."
+
     "
      self circleIcon inspect
      ImageEditor openOnClass:self andSelector:#circleIcon
-     Icon flushCachedIcons"
-    
-    ^ Icon constantNamed:'ImageEditor class circleIcon'
-        ifAbsentPut:[
-            (Depth1Image new)
-                width:14;
-                height:14;
-                photometric:(#palette);
-                bitsPerSample:(#( 1 ));
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'@@@@@@@A@@@@@@@@@@@@@@@C@@@@@@@@@@@@@@@a');
-                colorMapFromArray:#[ 0 0 0 255 0 0 ];
-                mask:((ImageMask new)
-                            width:14;
-                            height:14;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@N@CF@PDA@PH@  BB@HDA@PD@1 @8@@@@@a');
-                            yourself);
-                yourself
-        ]
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'ImageEditor class circleIcon'
+        ifAbsentPut:[(Depth1Image width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@@QAAD@@@C@X@@@@@@@CLA @@@Q@AD@@@@@a')
+            colorMapFromArray:#[0 0 0 127 127 127]
+            mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@@_@CF@PDC@XH@  BB@HLA PD@1 A<@@@@@a'); yourself); yourself]
 !
 
 copyIcon
@@ -1434,35 +1424,25 @@
 !
 
 specialCircleIcon
-    <resource: #image>
     "This resource specification was automatically generated
      by the ImageEditor of ST/X."
+
     "Do not manually edit this!! If it is corrupted,
      the ImageEditor may not be able to read the specification."
+
     "
      self specialCircleIcon inspect
      ImageEditor openOnClass:self andSelector:#specialCircleIcon
-     Icon flushCachedIcons"
-    
-    ^ Icon constantNamed:'ImageEditor class specialCircleIcon'
-        ifAbsentPut:[
-            (Depth1Image new)
-                width:14;
-                height:14;
-                photometric:(#palette);
-                bitsPerSample:(#( 1 ));
-                samplesPerPixel:(1);
-                bits:(ByteArray 
-                            fromPackedString:'@@L@@@!!BDB@ D4@HP@!!@BD@HHA@PHP!!@@@@@@@@a');
-                colorMapFromArray:#[ 0 0 0 255 0 0 ];
-                mask:((ImageMask new)
-                            width:14;
-                            height:14;
-                            bits:(ByteArray 
-                                        fromPackedString:'@@@@@@-@D2@''$D^HQ8!!G"DLHH1@PH@-@@0@@@@@a');
-                            yourself);
-                yourself
-        ]
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'ImageEditor class specialCircleIcon'
+        ifAbsentPut:[(Depth2Image width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@@@@@@@@PA@@@RBD@@P@@P@P@@A@D@@@PA@@@D@PHHA@A@@A@@D@A@@@PA@@@@@@@@@@@@@b')
+            colorMapFromArray:#[0 0 0 255 0 0 127 127 127]
+            mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@@-@E:@''$D^HQ8!!G"D^HH1@PH@-@@0@@@@@a'); yourself); yourself]
 !
 
 specialRectangleIcon
@@ -1482,9 +1462,9 @@
 
     ^Icon
         constantNamed:'ImageEditor class specialRectangleIcon'
-        ifAbsentPut:[(Depth1Image width:14 height:14) bits:(ByteArray fromPackedString:'@@L@@G!!:P@!!@B4@HP@!!@BD@HP@!!@BW!!8@@@@@@@a')
-            colorMapFromArray:#[0 0 0 255 0 0]
-            mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@G-8P0!!G"D^HQ8!!G"DLHP0!!@BG-8@0@@@@@a'); yourself); yourself]
+        ifAbsentPut:[(Depth2Image width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@@@@@@@UPAU@DBB@PA@@@D@P@@A@D@@@PA@@@D@PHHA@D@@@PA@@@D@UPAU@@@@@@@@@@@@b')
+            colorMapFromArray:#[0 0 0 255 0 0 127 127 127]
+            mask:((ImageMask width:14 height:14) bits:(ByteArray fromPackedString:'@@@@@G-8Q8!!G"D^HQ8!!G"D^HP0!!@BG-8@0@@@@@a'); yourself); yourself]
 !
 
 sprayIcon