Source position: graphics.pp line 368
const clActiveBackground = TColor ( clxBackground - cloActive );