Convert Integer into RGB color pairs

Level Extreme platform

Subscription

Corporate profile

Products & Services

Support

Legal

Français

Convert Integer into RGB color pairs

Message

From

01/11/2002 08:18:43

Doug Ringley
Raleigh, North Carolina, United States

31/10/2002 17:17:23

Marat Chariev
Semurg Enterprise
Montréal, Quebec, Canada

General information

Forum:

Visual FoxPro

Category:

Other

Title:

Re: Convert Integer into RGB color pairs

Miscellaneous

Thread ID:

00717572

Message ID:

00717729

Views:

Thanks!

>Try this:
>
>lnRed = BITAND(lnIntegerColor, 255)
>lnGreen = BITRSHIFT(BITAND(lnIntegerColor, 256^2 - 1), 8)
>lnBlue = BITRSHIFT(BITAND(lnIntegerColor, 256^3 - 1), 16)
>
>HTH

Map

View

Click here to load this message in the networking platform