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