I need to convert the value of the color button to a RGB value and I am unable to find how to do this. It means I am overthinking again. I just need to convert the color button value to the proper RGB value.  I tried converting to hex but that does not give good results on custom colors. Can somebody help me with this simple thing?

There's a few ways i think.

I do not know the best way.
Here's a function that returns [r,g,b,a] values from a color

It uses Color.ToHTML() to get a Hex value then converts it.

(EDIT: updated to handle alpha)


or if you just want the hex value use


Prints…
#FF0000

or if handling alpha too.
prints…
rgba(255,255,0,0.6)

Here's a slightly more concise version of the same routine.

Cedron said

Here's a slightly more concise version of the same routine.

Code (gambas)

1. Public Sub GetRGB(ArgColor As Integer) As Integer[]
2.  
3.     Dim r, g, b As Integer
4.  
5.     r = Shr(ArgColor, 16) And &FF&
6.     g = Shr(ArgColor, 8) And &FF&
7.     b = ArgColor And &FF&
8.  
9.     Return [r, g, b]
10.  
11. End
12.  

ooh nice , much better  

so with alpha..

BruceSteers said

…

so with alpha..

Code (gambas)

1.      a = Color.GetAlpha(ArgColor)
2.  

I didn't see your update.  Yes, I suspect that would be a microtad faster than using:

thank you. You put me on the right track. I modified the code you gave so it returns a string "RRGGBB" padded properly and seems to be giving me dead on color to pass on.