anchor.diff:      function GetCaptionVisible: boolean;
       procedure ControlsEnable(AEnable: boolean);
       function GetCanvas: TCanvas;
  -    function GetSingleSearch: boolean;
       procedure SetCaption(AValue: TCaption);
       procedure SetCaptionAlignment(AValue: TAlignment);
       procedure SetCaptionFont(AValue: TFont);
  
positive.code:       Height := 23;
        PopupMenu:=FSearchKindPopupMenu;
      end;
  
      FTopPanelRight := TPanel.Create(Self);
      FTopPanelRight.Parent := FTopPanel;
      with FTopPanelRight do
      begin
        BevelOuter := bvNone;
        Align := alRight;
        Height := 40;
        Width := 200;
  
        {FSearchLabel := TLabel.Create(Self);
        FSearchLabel.Parent := FTopPanelRight;
        with FSearchLabel do
        begin
          Left := 7;
          Top := 13;
          Width := 37;
          Height := 13;
          Caption := 'Search:';
        end;}
      end;
    end;
  
    FClientPanel := TPanel.Create(Self);
  
negative.code:     FTopPanelMultiSearchFixed: TPanel;
      FTopPanelMultiSearchClient: TPanel;
      FTopPanelMultiSearchRight: TPanel;
      FClientPanel: TPanel;
      FLoadDataPanel: TPanel;
      FLoadDataLabel: TLabel;
  