I will give it a go and let you know how I get on. Cheers
Chris. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sietse Wijnker Sent: 23 November 2006 10:12 To: [EMAIL PROTECTED] Subject: RE: Changing Colours You interpreted my suggestion correct, but it only works for colors where none of the components isn't maxed out. When working on a dark grey tone, it works. That's where i tested it.... > This does not work, for example if I set screen back colour to a nice > orange. > _screen.BackColor= RGB(255,128,0) Matter of taste..... ;-) How 'bout this: _screen.BackColor = RGB(255,128,0) _screen.BackColor = IncreaseColor(RGB(255,128,0),25) FUNCTION IncreaseColor(tnColor, lnIncrease) *- Determine the RGB values lnRed = BITAND(tnColor, 255) lnGreen = BITAND(BITRSHIFT(tnColor,8), 255) lnBlue = BITAND(BITRSHIFT(tnColor,16), 255) *- Increase the RGB values with a maximum of 255 lnRed = MIN(lnRed + lnIncrease, 255) lnGreen = MIN(lnGreen + lnIncrease, 255) lnBlue = MIN(lnBlue + lnIncrease, 255) *- Return the new color RETURN RGB(lnRed, lnGreen, lnBlue) ENDFUNC Sietse > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Chris Davis > Sent: woensdag 22 november 2006 17:51 > To: [EMAIL PROTECTED] > Subject: RE: Changing Colours > > This does not work, for example if I set screen back colour to a nice > orange. > > _screen.BackColor= RGB(255,128,0) > > And then do as you suggest and add a value to it, it does not change > it to a more vivid,brighter orange as I wish it turns green! > > _screen.backcolor=_screen.BackColor+RGB(25,25,25) > > Any more ideas, or have I interpreted your suggestion wrong ? > > Cheers > > Chris. > [excessive quoting removed by server] _______________________________________________ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
