anchor.diff:  
   uses
     Classes, SysUtils, StdCtrls, ExtCtrls, Controls, Grids, Types, Graphics,
  -  UCommon;
  +  UCommon, Generics.Collections;
   
   
   
  
positive.code:   TCustomVisualGrid = class(TCustomControl)
    protected type
      TUpdateOfVisualGridGUI = set of (updPageIndex, updPageSize);
    protected const
      PAGE_NAVIGATION_FIRST    = 1;
      PAGE_NAVIGATION_PREVIOUS = 2;
  
negative.code:   end;
  end;
  
  procedure TCustomVisualGrid.MultiSearchToggleBoxChange(Sender: TObject);
  begin
     FTopPanelMultiSearch.Visible := FMultiSearchToggleBox.State=cbChecked;
  end;
  
  function TCustomVisualGrid.GetCanvas: TCanvas;
  begin
    Result := FDrawGrid.Canvas;
  