anchor.diff:  
     { TVisualGridOptions }
   
  -  TVisualGridOptions = set of (vgoColAutoFill, vgoColSizing, vgoMultiSearchCheckComboBox, vgoSortDirectionAllowNone);
  +  TVisualGridOptions = set of (vgoColAutoFill, vgoColSizing, vgoAllowDeselect,
  +    vgoMultiSearchCheckComboBox, vgoSortDirectionAllowNone);
   
     { TSortMode }
   
  
positive.code:     procedure FetchPage(out AResult: TPageFetchResult);
      procedure AfterFetchPage;
      property ActiveDataTable: PDataTable read GetActiveDataTable;
    public
      constructor Create(Owner: TComponent); override;
      destructor Destroy; override;
  
negative.code: end;
  
  procedure TCustomVisualGrid.SetSelectionType(AValue: TSelectionType);
  begin
    if FSelectionType=AValue then
      Exit;
  
    FSelectionType:=AValue;
    UpdateSelection(FSelectionType);
  
    GridSelection(Self, 0, 0);
  end;
  
  procedure TCustomVisualGrid.SetWidgetControl(AValue: TControl);
  