[Lazarus] How to obtain the "real" color of a control @runtime?

[Bart]

Hi,

I'm trying to obtain the "real" color of a control (TEdit) at runtime.
The color at design time is set to clDefault ($20000000), but I need
to get the RGB value (which in this case should be $FFFFFF, since with
the current theme the default color of a TEdit on my OS is white).
I need this s I can have another control paint in that same color on
it's canvas.

ColorToRGB just gave me $0, whic is not what I'm looking for.

Any hints?

Bart