anchor.diff:          begin
             LCountOnPage2 := FTotalDataCount - ClientRowCount;
             LGridUnusedHeight := FDrawGrid.ClientHeight - FDrawGrid.GridHeight;
  +          LPotentialHeight := FBottomPanel.Height + LGridUnusedHeight;
  +          // vgoAutoHideSearchPanel + AutoPageSize + vgoAutoHidePaging is killer combo :P
  +          if (vgoAutoHideSearchPanel in FOptions) and FTopPanel.Visible and not Assigned(FWidgetControl) then
  +            LPotentialHeight := LPotentialHeight + FTopPanel.Height;
             if FBottomPanel.Visible
  -           and (FDrawGrid.DefaultRowHeight * LCountOnPage2 <= FBottomPanel.Height + LGridUnusedHeight) then
  +           and (FDrawGrid.DefaultRowHeight * LCountOnPage2 <= LPotentialHeight) then
             begin
               FBottomPanel.Visible := False;
               PageSize := PageSize + LCountOnPage2;
  
positive.code: var
    LSortDirectionAllowNone: boolean;
    LAutoHidePaging: boolean;
  begin
    if FOptions=AValue then Exit;
    LSortDirectionAllowNone := vgoSortDirectionAllowNone in FOptions;
    LAutoHidePaging := vgoAutoHidePaging in FOptions;
  
    FOptions:=AValue;
    if vgoColSizing in FOptions then
  
negative.code:     end;
    end else
      FTopPanelLeft.Width:=0;
  
    if LRefreshPageIndexAndGridInterface then
      RefreshPageIndexAndGridInterface;
  end;
  
  procedure TCustomVisualGrid.StandardDrawCell(Sender: TObject; ACol, ARow: Longint; Rect: TRect; State: TGridDrawState);
  