Custom Delphi Colours

Question

If i want to set a colour property to something thats non-standard (i.e. not something like clBlack or clRed) how can i do this? Can i set something like hexadecimal colours?

score 16 · Accepted Answer · answered Mar 18 '10 at 15:35

16

RGB in Windows.pas

function RGB(r, g, b: Byte): COLORREF;

you can cast the result to be a TColor.

e.g

MyColour := TColor(RGB(Red,Green,Blue));

answered Mar 18 '10 at 15:35

James

9,774
5
34
58

Normally, casting is done implicitly. A COLORREF and a `TColor` both are 32-bit integers. Hence, `MyColour := RGB(Red,Green,Blue);` will work just fine. – Andreas Rejbrand Apr 12 '18 at 10:25

SimaWB · Answer 2 · 2018-04-12T10:05:09.280

12

you can use $00BBGGRR

BB = Blue
GG = Green
RR = Red

All these values can be between 0 and 255 ($00 and $FF)

edited Apr 12 '18 at 10:05

answered Mar 18 '10 at 15:30

SimaWB

9,246
2
41
46

I tried this, but it worked for me only if I used $FF on the beginning - so $FFBBGGRR – Asped Jan 12 '14 at 16:04
2

@Asped: No, the highest byte in the DWORD should be 0 for a normal colour. But maybe you are using colours with an alpha channel? If so, $FF is probably full opacity. But alpha isn't normally used in Win32 GDI. – Andreas Rejbrand Apr 12 '18 at 10:24

score 3 · Answer 3 · answered Mar 18 '10 at 15:19

3

I always used RGB macro: http://delphi.wikia.com/wiki/RGB

answered Mar 18 '10 at 15:19

Andrey

59,039
12
119
163

score 0 · Answer 4 · answered Jun 01 '17 at 10:36

You might also want to check Colors in Delphi help page. If might be useful for Delphi developers who do web programming because Vcl.Graphics unit defines TColor values as clWeb____ web-friendly constants.

Many constants are already predefined and before you use them you can visually see how the colors look like. So there is no need to do RBG "mixes".

Custom Delphi Colours

4 Answers4