anchor.diff:          BevelOuter := bvNone;
           Height := 40;
           Width:=TScrollBarAccess.GetControlClassDefaultSize.cy;
  -      end;
  +      end;}
       end;
   
   
  
positive.code:     FCanSearch: boolean;
      FSelectionType: TSelectionType;
      function GetCanvas: TCanvas;
      procedure SetShowAllData(AValue: boolean);
      procedure SetAutoPageSize(AValue: boolean);
      procedure SetCanPage(AValue: boolean);
  
negative.code: 
      property CanPage: boolean read FCanPage write SetCanPage default true;
      property CanSearch: boolean read FCanSearch write SetCanSearch default true;
      property MultiSearchToggleBox: boolean read GetMultiSearchToggleBox write SetMultiSearchToggleBox;
      property MultiSearch: boolean read GetMultiSearch write SetMultiSearch;
      property Canvas: TCanvas read GetCanvas;
      property SelectionType: TSelectionType read FSelectionType write SetSelectionType;
  
  