equal
deleted
inserted
replaced
2002 Screen current centerOfMonitorHavingPointer |
2002 Screen current centerOfMonitorHavingPointer |
2003 " |
2003 " |
2004 ! |
2004 ! |
2005 |
2005 |
2006 hasColors:aBoolean |
2006 hasColors:aBoolean |
2007 "set the hasColors flag - needed since some servers dont tell the |
2007 "set the hasColors flag - needed since some servers don't tell the |
2008 truth if a monochrome monitor is connected to a color server. |
2008 truth if a monochrome monitor is connected to a color server. |
2009 Clearing the hasColors flag in the rc file will force use of grey |
2009 Clearing the hasColors flag in the rc file will force use of grey |
2010 colors (which might make a difference, since some colors are hard to |
2010 colors (which might make a difference, since some colors are hard to |
2011 distinguish on a greyscale monitor)." |
2011 distinguish on a greyscale monitor)." |
2012 |
2012 |
3566 ! |
3566 ! |
3567 |
3567 |
3568 colorNamed:aString |
3568 colorNamed:aString |
3569 "allocate a color with color name - return the color index (i.e. colorID). |
3569 "allocate a color with color name - return the color index (i.e. colorID). |
3570 Only a subset of the colorNames are available on all displays; |
3570 Only a subset of the colorNames are available on all displays; |
3571 therefore, dont use this method; at least only for the common names such as red, green, blue etc." |
3571 therefore, don't use this method; at least only for the common names such as red, green, blue etc." |
3572 |
3572 |
3573 ^ self |
3573 ^ self |
3574 getScaledRGBFromName:aString |
3574 getScaledRGBFromName:aString |
3575 into:[:r :g :b | |
3575 into:[:r :g :b | |
3576 self colorScaledRed:r scaledGreen:g scaledBlue:b |
3576 self colorScaledRed:r scaledGreen:g scaledBlue:b |
3577 ] |
3577 ] |
3578 |
3578 |
3579 " |
3579 " |
3580 Screen current colorNamed:'red' |
3580 Screen current colorNamed:'red' |
3581 " |
3581 " |
3582 ! |
3582 ! |
7081 |
7081 |
7082 ! |
7082 ! |
7083 |
7083 |
7084 leftShiftDown |
7084 leftShiftDown |
7085 "return true, if the left shift-key is currently pressed. |
7085 "return true, if the left shift-key is currently pressed. |
7086 Here, we dont differentiate between left and right shift keys." |
7086 Here, we don't differentiate between left and right shift keys." |
7087 |
7087 |
7088 ^ shiftDown |
7088 ^ shiftDown |
7089 |
7089 |
7090 "Created: 9.11.1996 / 19:06:48 / cg" |
7090 "Created: 9.11.1996 / 19:06:48 / cg" |
7091 ! |
7091 ! |
7104 |
7104 |
7105 ! |
7105 ! |
7106 |
7106 |
7107 rightShiftDown |
7107 rightShiftDown |
7108 "return true, if the right shift-key is currently pressed. |
7108 "return true, if the right shift-key is currently pressed. |
7109 Here, we dont differentiate between left and right shift keys." |
7109 Here, we don't differentiate between left and right shift keys." |
7110 |
7110 |
7111 ^ shiftDown |
7111 ^ shiftDown |
7112 |
7112 |
7113 "Created: 9.11.1996 / 19:06:56 / cg" |
7113 "Created: 9.11.1996 / 19:06:56 / cg" |
7114 ! |
7114 ! |