SETCOLORRGB

Graphics Function: Sets the current graphics color to the specified Red-Green-Blue (RGB) value.

Module: USE DFLIB

Syntax

result = SETCOLORRGB (color)

color
(Input) INTEGER(4). RGB color value to set the current graphics color to. Range and result depend on the system's display adapter.

Results:

The result is of type INTEGER(4). The result is the previous RGB color value.

In each RGB color value, each of the three colors, red, green, and blue, is represented by an eight-bit value (2 hex digits). In the value you specify with SETCOLORRGB, red is the rightmost byte, followed by green and blue. The RGB value's internal structure is as follows:

Larger numbers correspond to stronger color intensity with binary 1111111 (hex FF) the maximum for each of the three components. For example, #0000FF yields full-intensity red, #00FF00 full-intensity green, #FF0000 full-intensity blue, and #FFFFFF full-intensity for all three, resulting in bright white.

SETCOLORRGB sets the RGB color value of graphics over the background color, used by the following graphics functions: ARC, ELLIPSE, FLOODFILL, LINETO, OUTGTEXT, PIE, POLYGON, RECTANGLE, and SETPIXEL. SETBKCOLORRGB sets the RGB color value of the current background for both text and graphics. SETTEXTCOLORRGB sets the RGB color value of text over the background color (used by text functions such as OUTTEXT, WRITE, and PRINT).

SETCOLORRGB (and the other RGB color selection functions SETBKCOLORRGB, and SETTEXTCOLORRGB) sets the color to a value chosen from the entire available range. The non-RGB color functions (SETCOLOR, SETBKCOLOR, and SETTEXTCOLOR) use color indexes rather than true color values. If you use color indexes, you are restricted to the colors available in the palette, at most 256. Some display adapters (SVGA and true color) are capable of creating 262,144 (256K) colors or more. To access any available color, you need to specify an explicit RGB value with an RGB color function, rather than a palette index with a non-RGB color function.

Compatibility

STANDARD GRAPHICS QUICKWIN GRAPHICS LIB

See Also: SETBKCOLORRGB, SETTEXTCOLORRGB, GETCOLORRGB, ARC, ELLIPSE, FLOODFILLRGB, SETCOLOR, LINETO, OUTGTEXT, PIE, POLYGON, RECTANGLE, REMAPPALETTERGB, SETPIXELRGB, SETPIXELSRGB

Example

 ! Build as a QuickWin or Standard Graphics App.
 USE DFLIB
 INTEGER(2) numfonts
 INTEGER(4) oldcolor
 TYPE (xycoord) xy
 numfonts = INITIALIZEFONTS( )
 oldcolor = SETCOLORRGB(#0000FF)   ! red
 oldcolor = SETBKCOLORRGB(#00FF00) ! green
 CALL MOVETO(INT2(200), INT2(100), xy)
 CALL OUTGTEXT("hello, world")
 END