線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1483
推到 Plurk!
推到 Facebook!

MainMenu 某個item隱藏

缺席
sives1227
一般會員


發表:24
回覆:19
積分:8
註冊:2007-10-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-10-21 15:03:54 IP:114.33.xxx.xxx 訂閱
各位先進好
小弟有一個問題,在Form設置此MainMenu
例:此n11、n12為item的name
1 2 3
<!--[if !mso]> <style> v\:* {behavior:url(#default#VML);} o\:* {behavior:url(#default#VML);} w\:* {behavior:url(#default#VML);} .shape {behavior:url(#default#VML);} </style> <xml> Normal 0 0 2 false false false MicrosoftInternetExplorer4 </xml><![endif]--><!--[if gte mso 9]><xml> </xml><![endif]--><!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:表格內文; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-parent:""; mso-padding-alt:0cm 5.4pt 0cm 5.4pt; mso-para-margin:0cm; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman"; mso-ansi-language:#0400; mso-fareast-language:#0400; mso-bidi-language:#0400;} </style> n12 n22 n32
n23
及一個button,小弟想要設計按下button後,n22 item能隱藏起來
小弟試過mainmenu.item[1][1].visible := False;可以做到我想要的效果
但,小弟希望能搜尋name 做為隱藏的條件,但不知道語法為何
希望各位大大指導一下,謝謝


------
學問~學問~學著發問
老大仔
尊榮會員


發表:78
回覆:837
積分:1088
註冊:2006-07-06

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-10-21 15:54:47 IP:59.120.xxx.xxx 未訂閱
以下連結可以答到你要的要求
delphi.ktop.com.tw/board.php

請看2樓 小傑克 大大的刪除方式
然後再請自行做修改~


===================引 用 sives1227 文 章===================
各位先進好
小弟有一個問題,在Form設置此MainMenu
例:此n11、n12為item的name
1 2 3
<!--[if !mso]>
<style><br />v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style><br /><xml><br /> Normal 0 0 2 false false false MicrosoftInternetExplorer4

</xml><![endif]--><!--[if gte mso 9]><xml><br />

</xml><![endif]--><!--[if gte mso 10]>
<style><br /> /* Style Definitions */
table.MsoNormalTable {mso-style-name:表格內文; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-parent:""; mso-padding-alt:0cm 5.4pt 0cm 5.4pt; mso-para-margin:0cm; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman"; mso-ansi-language:#0400; mso-fareast-language:#0400; mso-bidi-language:#0400;}
</style><br />n12 n22 n32
n23
及一個button,小弟想要設計按下button後,n22 item能隱藏起來
小弟試過mainmenu.item[1][1].visible := False;可以做到我想要的效果
但,小弟希望能搜尋name 做為隱藏的條件,但不知道語法為何
希望各位大大指導一下,謝謝


編輯記錄
老大仔 重新編輯於 2010-10-21 01:55:14, 註解 無‧
老大仔 重新編輯於 2010-10-21 01:56:37, 註解 無‧
sives1227
一般會員


發表:24
回覆:19
積分:8
註冊:2007-10-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2010-10-25 10:06:13 IP:114.33.xxx.xxx 訂閱
小弟後來發現,原來可以直接使用,如下:
n21.visible := False;
這樣就可以做到了
但小弟又想做得活一點,想用一個edit裡的text 做為menuitem的名稱
如:
edit1.text := 'n21'
然後想使用上述的方式來做,又做不出來
是否為XXXXX as TMenuItem 然後......正確的寫法還研究不出來
再請大大們多多協助
P.S.此做法非動態創建TMainMenu
===================引 用 sives1227 文 章===================
各位先進好
小弟有一個問題,在Form設置此MainMenu
例:此n11、n12為item的name
1 2 3
n11 n21 n31
n12 n22 n32
n23
及一個button,小弟想要設計按下button後,n22 item能隱藏起來
小弟試過mainmenu.item[1][1].visible := False;可以做到我想要的效果
但,小弟希望能搜尋name 做為隱藏的條件,但不知道語法為何
希望各位大大指導一下,謝謝


------
學問~學問~學著發問
編輯記錄
sives1227 重新編輯於 2010-10-24 20:07:29, 註解 無‧
sives1227
一般會員


發表:24
回覆:19
積分:8
註冊:2007-10-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2010-10-25 18:07:49 IP:114.33.xxx.xxx 訂閱
終於小弟試出來
原來只要如此
(FindComponent('ITEM的NAME') as TMenuItem).Visible:=false;
就可以做到主旨所需要的效果了,唉~這樣的一句想破頭,小弟的功力太差了
小弟的目的其實是想要做到權限的控管,若有人有相同的問題時,再一起研究吧
謝謝大大們的幫忙

------
學問~學問~學著發問
編輯記錄
sives1227 重新編輯於 2010-10-25 04:08:47, 註解 無‧
系統時間:2024-05-08 9:18:05
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!