Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Manipulating RGB's functions
Message
 
To
25/11/2003 09:29:04
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00853263
Message ID:
00853268
Views:
16
This message has been marked as a message which has helped to the initial question of the thread.
Probably this:
*----------Function Color2rgb
LPARAMETERS lnColor
LOCAL lnR, lnG,lnB

lnb=INT(lnColor/16^4)
lnG=INT(lnColor%16^4/16^2)
lnR=lnColor%16^4%16^2
return "rgb("+;
	ltrim(str(bitand(lnColor,0x000000ff)))+","+ ;
	ltrim(str(bitrshift(bitand(lnColor,0x0000ff00),8)))+","+ ;
	ltrim(str(bitrshift(bitand(lnColor,0x00ff0000),16)))+")"
>Hello Friends;
>
>
>a = GETCOLOR(255)
>
>
>Calls colorpicker window and gives to the "A" a integer number of the chosen color.. How can I get the equivalent "RGB(?, ?, ?)" of it's expression ?
>
>TIA
>
>Claudio
Previous
Reply
Map
View

Click here to load this message in the networking platform