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