Retrieves an intensity value for the red component of a red-green-blue (RGB) value.
Rhino.ColorRedValue (lngRGB)
|
lngRGB |
Required. Number. The RGB color value. |
|
Number |
The red component if successful. |
|
Null |
If not successful or on error. |
Dim lngRGB
lngRGB = Rhino.LayerColor("Default")
Rhino.Print "Red = " & CStr( Rhino.ColorRedValue(lngRGB) )
Rhino.Print "Green = " & CStr( Rhino.ColorGreenValue(lngRGB) )
Rhino.Print "Blue = " & CStr( Rhino.ColorBlueValue(lngRGB) )