anchor.diff:      FSearchEdit: TEdit;
       FTopPanel: TPanel;
       FTopPanelRight: TPanel;
  +    //FClientPanel: TPanel;
       FBottomPanel: TPanel;
       FBottomCenterPanel: TPanel;
       FBottomRightPanel: TPanel;
  
positive.code:     end;
    end;
  
    FDrawGrid := TDrawGrid.Create(Self);
    FDrawGrid.Parent := Self;
    FDrawGrid.Align := alClient;
    FDrawGrid.OnDrawCell := StandardDrawCell;
  
    { default values for properties }
  
    PageSize := 100;
    PageIndex := -1;
  
    {$IFDEF VISUALGRID_DEBUG}
    with TButton.Create(Self) do
  
negative.code:     procedure PageSizeEditChange(Sender: TObject);
      procedure PageNavigationClick(Sender: TObject);
    private
      FCanPage: boolean;
      function GetCanvas: TCanvas;
      procedure SetCanPage(AValue: boolean);
  {$IFDEF VISUALGRID_DEBUG}
      procedure ClickTest(Sender: TObject);
  {$ENDIF}
  