Source position: graphics.pp line 300
const clGradientActiveCaption = TColor ( SYS_COLOR_BASE or COLOR_GRADIENTACTIVECAPTION );