Каким образом скрыть кнопку в меню в дизайнере?

Question

Accepted Answer

По аналогии с окном предварительного просмотра:

procedure TForm1.frxDesigner1Show(Sender: TObject); 
begin 
 if Sender is TfrxDesignerForm then 
 begin 
 TfrxDesignerForm(Sender).OpenB.Visible := False; 
 end; 
end; 
procedure TForm1.frxDesigner1Show(Sender: TObject); 
var i: integer; 
begin 
if Sender is TfrxDesignerForm then 
begin 
 for i:=0 to TfrxDesignerForm(Sender).ObjectsTB1.ButtonCount-1 do 
 if TfrxDesignerForm(Sender).ObjectsTB1.Buttons[i].ImageIndex in [30, 32] then //скрываются кнопки КОПИРОВАНИЕ ВНЕШНЕГО ВИДА и СЛУЖЕБНЫЙ ТЕКСТ 
 TfrxDesignerForm(Sender).ObjectsTB1.Buttons[i].Visible:=False; 
 TfrxDesignerForm(Sender).DataTree.FunctionsTree.Visible:=False; 
 TfrxDesignerForm(Sender).DataTree.ClassesTree.Visible:=False; 
end; 
end;