Source position: graphics.pp line 371
const clActiveHighlightedText = TColor ( clHighlightedText - cloActive );