anchor.diff:      Exit;
     FDelayedBoundsChangeTimer.Enabled:=false;
     if AutoPageSize then
  -    PageSize := ClientRowCount;
  +  begin
  +    // for vgoAutoHidePaging and AutoPageSize more space may be available
  +    // and paging panel may be hidden
  +    if (PageSize = ClientRowCount) and (vgoAutoHidePaging in FOptions) and FAutoPageSize then
  +      RefreshPageIndexAndGridInterface
  +    else
  +      PageSize := ClientRowCount;
  +  end;
   end;
   
   procedure TCustomVisualGrid.FetchDataThreadProgress(Sender: TObject);
  
positive.code: procedure TCustomVisualGrid.SetOptions(AValue: TVisualGridOptions);
  var
    LSortDirectionAllowNone: boolean;
  begin
    if FOptions=AValue then Exit;
    LSortDirectionAllowNone := vgoSortDirectionAllowNone in FOptions;
  
    FOptions:=AValue;
    if vgoColSizing in FOptions then
  
negative.code:   // refresh for sort direction graphic
    if LSortDirectionAllowNone <> (vgoSortDirectionAllowNone in AValue) then
      SortDirectionGlyphRefresh;
    // try to hide paging panel
    if LAutoHidePaging <>  (vgoAutoHidePaging in AValue) then
      RefreshPageIndexAndGridInterface;
  end;
  
  procedure TCustomVisualGrid.SetRows(ARow: Integer; AValue: Variant);
  