anchor.diff:    RePaint;
   end;
   
  +procedure TfpgBaseGrid.SetHeaderHeight(const AValue: integer);
  +begin
  +  if AValue >= FHeaderFont.Height + 2 then
  +    FHeaderHeight := AValue;
  +  Repaint;
  +end;
  +
   procedure TfpgBaseGrid.SetHeaderStyle(const AValue: TfpgGridHeaderStyle);
   begin
     if FHeaderStyle = AValue then
  
positive.code:     procedure   HScrollBarMove(Sender: TObject; position: integer);
      procedure   SetFontDesc(const AValue: string);
      procedure   SetHeaderFontDesc(const AValue: string);
      procedure   SetHeaderStyle(const AValue: TfpgGridHeaderStyle);
      procedure   SetRowSelect(const AValue: boolean);
      procedure   SetScrollBarStyle(const AValue: TfpgScrollStyle);
  
negative.code:   fpg_widget,
    fpg_scrollbar,
    fpg_menu;
  
  type
  
    TfpgGridDrawState = set of (gdSelected, gdFocused, gdFixed);
  