anchor.diff:  
     { TVisualGridOptions }
   
  -  TVisualGridOptions = set of (vgoColAutoFill, vgoColSizing, vgoAutoHidePaging, vgoMultiSearchCheckComboBox, vgoSortDirectionAllowNone);
  +  TVisualGridOptions = set of (vgoColAutoFill, vgoColSizing, vgoAutoHidePaging, vgoAutoHideSearchPanel, vgoMultiSearchCheckComboBox, vgoSortDirectionAllowNone);
   
     { TSortMode }
   
  
positive.code: 
  procedure TCustomVisualGrid.RefreshPageIndexAndGridInterface;
  var
    LCountOnPage2, LCount: Integer;
    LGridUnusedHeight: integer;
  begin
    SetPageIndexEditText(IntToStr(Succ(FPageIndex)));
    FPageCountLabel.Caption := Format('/%d',[FPageCount]);
  
negative.code: end;
  
  procedure TCustomVisualGrid.SetWidgetControl(AValue: TControl);
  var
    LRefreshPageIndexAndGridInterface: boolean;
  begin
    if FWidgetControl=AValue then Exit;
  
    if Assigned(FWidgetControl) then
      FWidgetControl.Parent := FWidgetControlParent;
  
    LRefreshPageIndexAndGridInterface := (not Assigned(FWidgetControl) and Assigned(AValue)) or (not Assigned(AValue) and Assigned(FWidgetControl));
    FWidgetControl:=AValue;
  
    if Assigned(AValue) then
  