anchor.diff:      FAlternativeBGColor: TfpgColor;
       function    GetFontDesc: string;
       function    GetHeaderFontDesc: string;
  +    function    GetTotalColumnWidth: integer;
       procedure   HScrollBarMove(Sender: TObject; position: integer);
       procedure   SetFontDesc(const AValue: string);
       procedure   SetHeaderFontDesc(const AValue: string);
  
positive.code:   begin
      Dec(VHeight, FHScrollBar.Height);
      FHScrollBar.Min         := 0;
      FHScrollBar.SliderSize  := 0.2;
      if go_SmoothScroll in FOptions then
      begin
        FHScrollBar.Max := cw - vw;
        FHScrollBar.Position := FXOffset;
      end
      else
      begin
        FHScrollBar.Max := ColumnCount-1;
        FHScrollBar.Position := FFirstCol;
      end;
      FHScrollBar.RepaintSlider;
    end;
  
negative.code:     property    ShowGrid: boolean read FShowGrid write SetShowGrid default True;
      property    ScrollBarStyle: TfpgScrollStyle read FScrollBarStyle write SetScrollBarStyle default ssAutoBoth;
      property    HeaderHeight: integer read FHeaderHeight;
      property    TotalColumnWidth: integer read GetTotalColumnWidth;
  //    property    ColResizing: boolean read FColResizing write FColResizing;
      property    ColumnWidth[ACol: Integer]: integer read GetColumnWidth write SetColumnWidth;
      property    ColumnBackgroundColor[ACol: Integer]: TfpgColor read GetColumnBackgroundColor write SetColumnBackgroundColor;
  