Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to make regular popup look like shortcut popup?
Message
 
 
À
25/10/2001 05:17:41
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:
00573101
Vues:
28
>>>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 >
>
>I think this wouldn't work prior to VFP6 :)
>Cetin

Fortunatelly, I don't have to worry about that :)
--sb--
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform