我在使用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);

謝謝

可以利用 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。