popupmenu動態產生的問題 |
尚未結案
|
cd109
一般會員 發表:23 回覆:33 積分:11 註冊:2003-12-22 發送簡訊給我 |
我在使用popupmenu動態產生item,外表示有成功沒錯,但是這樣的話我就無法指定特定的事件了,請問各位大哥有寫過類似的code可供小弟參考嗎!
PS:
1.我按右鍵做選擇的時候,沒有辦法傳遞我正選擇的index(內建的方法沒有),請問有無好方法ㄋ.
2.我想要的功能是,在圖表上按右鍵可以控制圖表上的線條是否出現(以popupmenu上的item是否打勾來做決定).
for i:=0 to Chart.SeriesList.Count-1 do begin pitem := TMenuItem.Create(nil); pitem.Caption := Chart.SeriesList.Series[i].Title; pitem.onClick :=SelectMenuClick;//=>>額外請問一下事件是否可以動態產生. Popm.Items.Add(pitem); pitem.Checked:=true; end; pitem := TMenuItem.Create(nil); pitem.Caption :='show all Series'; Popm.Items.Add(pitem);謝謝 |
wameng
版主 發表:31 回覆:1336 積分:1188 註冊:2004-09-16 發送簡訊給我 |
可以利用 TMenuItem.Tag 屬性拿來運用。
.... pitem.Caption := Chart.SeriesList.Series[i].Title; pitem.Tag := I; pitem.onClick :=SelectMenuClick; .... Procedure SelectMenuClick(Sender:Tobject); begin Case Tcomponent(Sender).Tag of 0 : .. end; end;> 額外請問一下事件是否可以動態產生. 應該是不可能。要不然 如何寫處理的 Code。 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |