anchor.diff:  function TCustomVisualGrid.GetCanvas: TCanvas;
   begin
     Result := FDrawGrid.Canvas;
  -end;
  -
  -function TCustomVisualGrid.GetSingleSearch: boolean;
  -begin
  -  Result := FTopPanelRight.Visible;
   end;
   
   procedure TCustomVisualGrid.SetCaption(AValue: TCaption);
  
positive.code:     FTopPanelMultiSearchFixed: TPanel;
      FTopPanelMultiSearchClient: TPanel;
      FTopPanelMultiSearchRight: TPanel;
      FTopPanelRight: TPanel;
      FClientPanel: TPanel;
      FLoadDataPanel: TPanel;
      FLoadDataLabel: TLabel;
  
negative.code:       Height := 23;
        PopupMenu:=FSearchKindPopupMenu;
      end;
    end;
  
    FClientPanel := TPanel.Create(Self);
  