Converts ByLayer color value to real one.

function RealColor(AColor: TColor): TColor;

Description

If AColor is not clByLayer, returns AColor unchanged. Otherwise, returns own Color property; if it is clByLayer too, returns Owner.RealColor if Owner exists.