[Lazarus] How to obtain the color of a component?

[Felipe Monteiro de Carvalho]

Hello,

Is there any easy way to obtain the color of a component taking into
considerating all the factors? aka, propagating ParentColor, resolving
clDefault, etc.

I have my TCDPageControl on top of a form, but for
TCDPageControl.Color I get just clDefault, which turns out to be
black. =( using Parent.GetDefaultColor(dcBrush) also returned black in
Windows...

If there is no easy way maybe we should add one?

-- 
Felipe Monteiro de Carvalho