Source position: graphics.pp line 366
const clActiveButtonText = TColor ( clButtonText - cloActive );