Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Manipulating RGB's functions
Message
 
À
25/11/2003 09:29:04
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00853263
Message ID:
00853268
Vues:
15
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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform