TStringGrid - 标题实现渐变色

 GradientFillCanvas(Canvas, GetShadowColor(clHighlight, 45), GetShadowColor(clHighlight, 10), Header, gdVertical);