請問先進 要讓MainMenu之某ㄧ段可使用與否用下列方式 MainMenu.Item[5].Enabled 請問二個問題 1.關於第幾項(Item[5])ㄧ定要用數的嗎?不知哪一屬性可以查詢這是第幾項? 2.如果要將次目錄(SubMenu)關閉或開啟,亦即如MainMenu.Item[5].Enabled之意思,我不知次目錄應如何取得?

1.請問你是要MainMenu下面項目的Enabled設為Fasle嗎 如果是的話應該是要寫成 MainMenu1.Items[0].Items[5].enabled := False; 就是第一個選項的下拉第六個item設為False 2.不一定要用數的，你可以給定name，直接設Name.enabled := False

您好: 不一定要用數的,您也可以直接把MainMenu打開,直接在上面點選,然後去看他的物件名稱,如N1,N2..等,直接去設N1.Visible:=false他就會消失了. ps:用這方式就不會有第二各問題ㄌ. 發表人 - supman 於 2004/11/09 10:46:56

Munu的項目要用類似「層級」的概念，且每一層都從0開始，而最上層的選項建議還是用元件name指定，不然也可用MainMenu.Items.Count來每一層都找，以下是用'Caption'來找出'1-3'是在file選項裡第的第幾個項目，找到後再找'1-3'次目錄裡的'1-3-1'是第幾個項目，找到後再指定屬性。    

 
procedure TForm1.Button1Click(Sender: TObject);
var
  iIndex1, iIndex2:Integer;
begin
  iIndex1:=Nfile.IndexOf(Nfile.Find('1-3'));//找第一項裡的caption 1-3
  if iIndex1 <> -1 then//有找到第一層
    iIndex2:=Nfile.Items[iIndex1].IndexOf(Nfile.Items[iIndex1].Find('1-3-1'));
  if iIndex2 <> -1 then//有找到第二層
    Nfile.Items[iIndex1].Items[iIndex2].Enabled:=False;//設定屬性
end;

學而不思則罔，思而不學則怠