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

[Felipe Monteiro de Carvalho]

On Fri, Oct 21, 2011 at 10:14 AM, Paul Ishenin <ip at kmiac.ru> wrote:
> How ParentColor property will work in this case?

I think that it would work like this:

function TWinControl.GetColor: TColor
begin
  if ParentColor and (Parent <> nil) then Result := Parent.Color
  else Result := FColor;
end;

-- 
Felipe Monteiro de Carvalho