anchor.diff:  
   procedure TCustomVisualGrid.GridSelection(Sender: TObject; aCol, aRow: Integer);
   begin
  -  if (SelectionType <> stNone) and Assigned(FOnSelection) then
  +  if (FCurrentSelectionType <> stNone) and Assigned(FOnSelection) and (not FIgnoreSelectionEvent) then
       FOnSelection(Self, Selection);
   end;
   
  
positive.code:   FMultiSearchEdits := TObjectList<TSearchEdit>.Create;
    FColumns := TObjectList<TVisualColumn>.Create;
    FFilters := TList<TColumnFilter>.Create;
  
    { component layout }
  
  
negative.code:     procedure FetchPage(out AResult: TPageFetchResult);
      procedure AfterFetchPage;
      property ActiveDataTable: PDataTable read GetActiveDataTable;
      procedure UpdateSelection(ASelectionType: TSelectionType);
      function SelectionsEquals(constref A, B: TVisualGridSelection): boolean;
      procedure ResetLastSelection; inline;
    public
      constructor Create(Owner: TComponent); override;
      destructor Destroy; override;
  