anchor.diff:      property Options: TVisualGridOptions read FOptions write SetOptions;
       property Canvas: TCanvas read GetCanvas;
       property SelectionType: TSelectionType read FSelectionType write SetSelectionType;
  -    // IMPORTANT: set DeselectionType before SelectionType to avoid auto-selected first row
       property DeselectionType: TDeselectionType read FDeselectionType write SetDeselectionType;
       property Selection: TVisualGridSelection read GetSelection;
       property SelectedRows : TArray<Variant> read GetSelectedRows;
  
positive.code:   end;
  
    // show or hide Search Panel (related to option vgoAutoHideSearchPanel)
    if (vgoAutoHideSearchPanel in FOptions) and (FPageCount in [0,1]) then
    begin
      if FCanSearch then
      begin
  
negative.code:   LCountOnPage2: Integer;
    LGridUnusedHeight, LPotentialHeight: integer;
    LWasVisible: boolean;
    LHasFilter: boolean;
  
    function RecalcPageCount: boolean;
    var
  