谢谢makebest,,此方法可行.同时引出以下两个问题
1.tcontrol只对button 如果是toolbutton,TMenuItem 不知用什么类;
2.button1变量不是写成'form1.button1'加上窗体名称报内存错误
网上查找到以下方法
if (FindComponent('button1') is Tbutton) then TMenuItem(FindComponent('button1')).Visible:=false;
好像也是可行了,同样不能加窗体名称.
不知可有更好的方法..