*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 14 Oct 2004 15:12:36 +0200
changeset 2755 f8035120da51
parent 2754 e1099c448aa9
child 2756 5a1646996277
*** empty log message ***
MenuPanel.st
--- a/MenuPanel.st	Thu Oct 14 14:58:07 2004 +0200
+++ b/MenuPanel.st	Thu Oct 14 15:12:36 2004 +0200
@@ -24,7 +24,9 @@
 		originator centerItems hideOnRelease defaultHideOnRelease'
 	classVariableNames:'InitialSelectionQuerySignal Images LigthenedImages
 		DefaultForegroundColor DefaultBackgroundColor IconIndicationOn
-		IconIndicationOff IconRadioOn IconRadioOff'
+		IconIndicationOff IconRadioOn IconRadioOff
+		IconDisabledIndicationOn IconDisabledIndicationOff
+		IconDisabledRadioOn IconDisabledRadioOff'
 	poolDictionaries:''
 	category:'Views-Menus'
 !
@@ -374,9 +376,12 @@
 
     <resource: #image>
 
-    ^Icon
-	constantNamed:#'MenuPanel iconIndicationDisabledOff'
-	ifAbsentPut:[(Depth2Image new) width: 14; height: 14; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'UUUUPG???8A:***@^*** G***(A:***@^*** G***(A:***@^*** G***(A:***@Z*** @@@@@@b') ; colorMapFromArray:#[255 255 255 127 127 127 170 170 170 0 0 0]; mask:((Depth1Image new) width: 14; height: 14; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a') ; yourself); yourself]
+    IconDisabledIndicationOff isNil ifTrue:[
+        IconDisabledIndicationOff := Icon
+            constantNamed:#'MenuPanel iconIndicationDisabledOff'
+            ifAbsentPut:[(Depth2Image new) width: 14; height: 14; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'UUUUPG???8A:***@^*** G***(A:***@^*** G***(A:***@^*** G***(A:***@Z*** @@@@@@b') ; colorMapFromArray:#[255 255 255 127 127 127 170 170 170 0 0 0]; mask:((Depth1Image new) width: 14; height: 14; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a') ; yourself); yourself]
+    ].
+    ^ IconDisabledIndicationOff
 !
 
 iconIndicationDisabledOn
@@ -393,9 +398,12 @@
 
     <resource: #image>
 
-    ^Icon
-	constantNamed:#'MenuPanel iconIndicationDisabledOn'
-	ifAbsentPut:[(Depth2Image new) width: 14; height: 14; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'****$H@@@MBO???P#???4H??<=BO?<OP#O<C4H0<C=BL@C?P#0C?4H?C?=BO???P/???4EUUUU@b') ; colorMapFromArray:#[0 0 0 255 255 255 127 127 127 170 170 170]; mask:((Depth1Image new) width: 14; height: 14; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a') ; yourself); yourself]
+    IconDisabledIndicationOn isNil ifTrue:[
+        IconDisabledIndicationOn := Icon
+            constantNamed:#'MenuPanel iconIndicationDisabledOn'
+            ifAbsentPut:[(Depth2Image new) width: 14; height: 14; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'****$H@@@MBO???P#???4H??<=BO?<OP#O<C4H0<C=BL@C?P#0C?4H?C?=BO???P/???4EUUUU@b') ; colorMapFromArray:#[0 0 0 255 255 255 127 127 127 170 170 170]; mask:((Depth1Image new) width: 14; height: 14; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'??3??O?<??3??O?<??3??O?<??3??O?<??3??@@a') ; yourself); yourself]
+    ].
+    ^ IconDisabledIndicationOn
 !
 
 iconIndicationOff
@@ -456,9 +464,12 @@
 
     <resource: #image>
 
-    ^Icon
-	constantNamed:#'MenuPanel iconRadioGroupDisabledOff'
-	ifAbsentPut:[(Depth2Image new) width: 15; height: 15; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@AUP@@E@AP@DJ*Y@DZ**(AJ**+AJ***LR***#D***(1J***LR***#AZ**#@Z**(0A** 0@C@C0@@O?@@') ; colorMapFromArray:#[0 0 0 85 85 85 170 170 170 255 255 255]; mask:((Depth1Image new) width: 15; height: 15; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A<@_<C?8_?1??O?:??+?>/?:??)?=G?4O< HL@_@') ; yourself); yourself]
+    IconDisabledRadioOff isNil ifTrue:[
+        IconDisabledRadioOff := Icon
+            constantNamed:#'MenuPanel iconRadioGroupDisabledOff'
+            ifAbsentPut:[(Depth2Image new) width: 15; height: 15; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@AUP@@E@AP@DJ*Y@DZ**(AJ**+AJ***LR***#D***(1J***LR***#AZ**#@Z**(0A** 0@C@C0@@O?@@') ; colorMapFromArray:#[0 0 0 85 85 85 170 170 170 255 255 255]; mask:((Depth1Image new) width: 15; height: 15; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A<@_<C?8_?1??O?:??+?>/?:??)?=G?4O< HL@_@') ; yourself); yourself]
+    ].
+    ^ IconDisabledRadioOff
 !
 
 iconRadioGroupDisabledOn
@@ -476,9 +487,12 @@
 
     <resource: #image>
 
-    ^Icon
-        constantNamed:#'MenuPanel class iconRadioGroupDisabledOn'
-        ifAbsentPut:[(Depth2Image new) width: 15; height: 15; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@AUP@@E@AP@DJ*Y@DYUZ(AIUU+AIUUVLRUUU#D%UUX1IUUVLRUUU#AYUU#@Z%U(0A** 0@C@C0@@O?@@') ; colorMapFromArray:#[0 0 0 85 85 85 170 170 170 255 255 255]; mask:((Depth1Image new) width: 15; height: 15; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A<@_<C?8_?1??O?:??+?>/?:??)?=G?4O< HL@_@') ; yourself); yourself]
+    IconDisabledRadioOn isNil ifTrue:[
+        IconDisabledRadioOn := Icon
+            constantNamed:#'MenuPanel class iconRadioGroupDisabledOn'
+            ifAbsentPut:[(Depth2Image new) width: 15; height: 15; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@AUP@@E@AP@DJ*Y@DYUZ(AIUU+AIUUVLRUUU#D%UUX1IUUVLRUUU#AYUU#@Z%U(0A** 0@C@C0@@O?@@') ; colorMapFromArray:#[0 0 0 85 85 85 170 170 170 255 255 255]; mask:((Depth1Image new) width: 15; height: 15; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A<@_<C?8_?1??O?:??+?>/?:??)?=G?4O< HL@_@') ; yourself); yourself]
+    ].
+    ^ IconDisabledRadioOn
 !
 
 iconRadioGroupOff
@@ -606,6 +620,10 @@
         #'menu.iconIndicationOn.bitmapFile' #'menu.iconIndication.bitmapOffFile'
         #'menu.iconRadioOn' #'menu.iconRadioOff'
         #'menu.iconRadioOn.bitmapFile' #'menu.iconRadioOff.bitmapFile'
+        #'menu.iconDisabledIndicationOn' #'menu.iconDisabledIndicationOff'
+        #'menu.iconDisabledIndicationOn.bitmapFile' #'menu.iconDisabledIndication.bitmapOffFile'
+        #'menu.iconDisabledRadioOn' #'menu.iconDisabledRadioOff'
+        #'menu.iconDisabledRadioOn.bitmapFile' #'menu.iconDisabledRadioOff.bitmapFile'
     )>
 
     |styleSheet style var foregroundColor backgroundColor buttonPassiveBackgroundColor
@@ -716,6 +734,15 @@
     var notNil ifTrue:[
         IconIndicationOff := var.
     ].
+    var := getBitmapOrFile value:#'menu.iconDisabledIndicationOn' value:#'menu.iconDisabledIndicationOn.bitmapFile'.
+    var notNil ifTrue:[
+        IconDisabledIndicationOn := var.
+    ].
+    var := getBitmapOrFile value:#'menu.iconDisabledIndicationOff' value:#'menu.iconDisabledIndicationOff.bitmapFile'.
+    var notNil ifTrue:[
+        IconDisabledIndicationOff := var.
+    ].
+
     var := getBitmapOrFile value:#'menu.iconRadioOn' value:#'menu.iconRadioOn.bitmapFile'.
     var notNil ifTrue:[
         IconRadioOn := var.
@@ -724,6 +751,14 @@
     var notNil ifTrue:[
         IconRadioOff := var.
     ].
+    var := getBitmapOrFile value:#'menu.iconDisabledRadioOn' value:#'menu.iconDisabledRadioOn.bitmapFile'.
+    var notNil ifTrue:[
+        IconDisabledRadioOn := var.
+    ].
+    var := getBitmapOrFile value:#'menu.iconDisabledRadioOff' value:#'menu.iconDisabledRadioOff.bitmapFile'.
+    var notNil ifTrue:[
+        IconDisabledRadioOff := var.
+    ].
 
     "
      self updateStyleCache
@@ -7538,7 +7573,7 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.399 2004-10-14 12:58:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.400 2004-10-14 13:12:36 cg Exp $'
 ! !
 
 MenuPanel initialize!