Source position: graphics.pp line 389
type TMappedColor = clActiveHighlightedText..clNormalForeground;