anchor.diff:    end;
   
     FBottomPanel := TPanel.Create(Self);
  -  FBottomPanel.ControlStyle := FBottomPanel.ControlStyle - [csAcceptsControls];
     FBottomPanel.Parent := Self;
     with FBottomPanel do
     begin
  
positive.code:     property DataSource: IDataSource read FDataSource write SetDataSource;
      property PageSize: Integer read FPageSize write SetPageSize default 100;
      property PageIndex: Integer read FPageIndex write SetPageIndex default -1;
      property Canvas: TCanvas read GetCanvas;
  
      property OnDrawVisualCell: TDrawVisualCellEvent read FOnDrawVisualCell write FOnDrawVisualCell;
  
negative.code: 
    { component layout }
  
    ControlStyle := ControlStyle - [csAcceptsControls] + [csOwnedChildrenNotSelectable];
  
    FTopPanel := TPanel.Create(Self);
    FTopPanel.Parent := Self;
    with FTopPanel do
    begin
  