anchor.diff:      property CanPage: boolean read FCanPage write SetCanPage default true;
       property CanSearch: boolean read FCanSearch write SetCanSearch default true;
       property Canvas: TCanvas read GetCanvas;
  +    property SelectionType: TSelectionType read FSelectionType write SetSelectionType;
   
       property OnDrawVisualCell: TDrawVisualCellEvent read FOnDrawVisualCell write FOnDrawVisualCell;
     end;
  
positive.code: 
  
  type
    TSortDirection = (sdNone, sdAscending, sdDescending);
    TVisualGridFilter = (vgfMatchTextExact, vgfMatchTextBeginning, vgfMatchTextEnd,
      vgfMatchTextAnywhere, vgfNumericEQ, vgfNumericLT, vgfNumericLTE, vgfNumericGT,
  
negative.code:       Align := alClient;
        BorderStyle := bsNone;
        OnDrawCell := StandardDrawCell;
        Options := Options - [goRangeSelect];
      end;
      FDefaultDrawGridOptions := FDrawGrid.Options;
    //end;
  
    FDelayedBoundsChangeTimer := TTimer.Create(Self);
  