How to Convert a RGBCOMP() Value into Component Values

 Last reviewed: April 10, 1996
Article ID: Q149184
The information in this article applies to:
  • Microsoft Visual FoxPro for Windows, versions 3.0, 3.0b

SUMMARY

The RGBCOMP() function is new to Foxtools.fll. It accepts an RGB composite value as an argument and converts it to the three component values for you. In effect, it is the counterpart to FoxPro's RGB() function.

MORE INFORMATION

RGBComp() returns the Red, Green, and Blue components of a composite RGB color value. The syntax is: 

   RGBComp( nRGBColor, @nRedVal, @nGreenVal, @nBlueVal )
Parameters:
  • nRGBColor is a composite RGB color value ranging from 0 to 16777215.
  • nRedVal, upon return, is the intensity of the red color component of nRGBColor.
  • nGreenVal, upon return, is the intensity of the green color component of nRGBColor.
  • nBlueVal, upon return, is the intensity of the blue color component of nRGBColor.

Sample Code

The following code gives an example implementation:

*-- Set up to use FoxTools.FLL 

     CLEAR
     SET LIBRARY TO SYS(2004) + '\FOXTOOLS'
*-- Declare some variables to be used in the function calls 
     nRedVal = 0
     nBlueVal = 0
     nGreenVal = 0
*-- Display as we go. 
     ? RGBCOMP(65537, @nRedVal, @nGreenVal, @nBlueVal)
     ? nRedVal, nGreenVal, nBlueVal

     = RGBCOMP(65537 + 44 + 256 * 4, @nRedVal, @nGreenVal, @nBlueVal)
     ? nRedVal, nGreenVal, nBlueVal

     = RGBCOMP(65537 + 86 + 256 * 4, @nRedVal, @nGreenVal, @nBlueVal)
     ? nRedVal, nGreenVal, nBlueVal
*-- Reset the current active library. 
     SET LIBRARY TO

Additional reference words: 3.00 3.00b VFoxWin
KBCategory: kbprg kbhowto kbcode
KBSubcategory: FxprgFoxtools



THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: April 10, 1996
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.