Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to make regular popup look like shortcut popup?
Message
 
 
À
24/10/2001 13:41:57
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00572628
Message ID:
00572813
Vues:
24
>Colin you could directly use GetColor() to provide your values.
>
>? Color2RGB(GetColor())
>
>
function Color2RGB
>lparameters RGBcolor
>* Color = 0x00bbggrr
>return "rgb("+;
>	ltrim(str(bitand(RGBColor,0x000000ff)))+","+ ;
>	ltrim(str(bitrshift(bitand(RGBColor,0x0000ff00),8)))+","+ ;
>	ltrim(str(bitrshift(bitand(RGBColor,0x00ff0000),16)))+")"
>
A little bit different version
return "rgb(" + ;
	Transform(bitand(RGBColor,0xff)) + "," + ;
	Transform(bitand(bitrshift(RGBColor,8), 0xff)) + "," + ;
	Transform(bitand(bitrshift(RGBColor,16), 0xff)) + ")"
< snip >
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform