anchor.diff:        Left := 4;
         Top := 6;
         Height:=28;
  -      Width := 150;
  +      Width := 120;
         OnChange:=MultiSearchToggleBoxChange;
       end;
  +
  +    FMultiSearchButton := TButton.Create(Self);
  +    FMultiSearchButton.Parent := FTopPanel;
  +    with FMultiSearchButton do
  +    begin
  +      Left := 126;
  +      Top := 6;
  +      Width := 28;
  +      Height := 28;
  +      Caption := 'OK';
  +    end;
  +
   
       FTopPanelRight := TPanel.Create(Self);
       FTopPanelRight.Parent := FTopPanel;
  
positive.code: procedure TCustomVisualGrid.MultiSearchToggleBoxChange(Sender: TObject);
  begin
     FTopPanelMultiSearch.Visible := FMultiSearchToggleBox.State=cbChecked;
     LayoutChanged;
  end;
  
  
negative.code:     FSearchEdit: TEdit;
      FSearchButton: TButton;
      FMultiSearchToggleBox: TToggleBox;
      FMultiSearchButton: TButton;
      FTopPanel: TPanel;
      FTopPanelMultiSearch: TPanel;
      FTopPanelMultiSearchFixed: TPanel;
  