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

Mattias Gaertner nc-gaertnma at netcologne.de
Mon Dec 22 23:30:27 CET 2014


On Mon, 22 Dec 2014 18:49:58 +0100
Bart <bartjunk64 at gmail.com> wrote:

> 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.

What platform, Lazarus version, widgetset?

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

The background can be an image, gradient or whatever. So on some themes
this might be the correct result.

Mattias




More information about the Lazarus mailing list