anchor.diff:    ReloadColumns;
   end;
   
  +procedure TCustomVisualGrid.BoundsChanged;
  +begin
  +  inherited BoundsChanged;
  +  // fix maximize form problem for AutoPageSize (new size of grid is not yet fully propagated)
  +  FDelayedBoundsChangeTimer.Enabled:=true;
  +end;
  +
  +procedure TCustomVisualGrid.DelayedBoundsChange(Sender: TObject);
  +begin
  +  FDelayedBoundsChangeTimer.Enabled:=false;
  +  if AutoPageSize then
  +    PageSize := ClientRowCount;
  +end;
  +
   procedure TCustomVisualGrid.PageIndexEditChange(Sender: TObject);
   var
     LPageIndex: Integer;
  
positive.code:     property DataSource: IDataSource read FDataSource write SetDataSource;
      property PageSize: Integer read FPageSize write SetPageSize default 100;
      property PageIndex: Integer read FPageIndex write SetPageIndex default -1;
      property CanPage: boolean read FCanPage write SetCanPage default true;
      property CanSearch: boolean read FCanSearch write SetCanSearch default true;
      property Canvas: TCanvas read GetCanvas;
  
negative.code:   published
      property Align;
      property PageSize;
      property AutoPageSize;
      property CanPage;
      property CanSearch;
  
  