Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to make regular popup look like shortcut popup?
Message
 
 
To
25/10/2001 05:17:41
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00572628
Message ID:
00573101
Views:
29
>>>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--
Previous
Reply
Map
View

Click here to load this message in the networking platform