如何取得popupmenu中动态生成的项的caption。

Question

例如我在程序中动态生成了popupmenu的项a1,a2,a3,a4,a5.
我想在点a1的时候出现a1的label，点a2的时候出现a2的label.....
怎么实现？？

Answer 1

我不想用tnotify event,有没有简单一点的方法啊。

Answer 2

个人觉得最好的方法是使用TAction。
只要将你的菜单项指向这个action就可以了，方便而且实用。同时更可以对事件及其他各种属性操作

Answer 3

事件执行过程你得事先写好，然后再动态生成的菜单里将菜单的click事件指向就行了。
这样子：
一、生成菜单：
var
  Device: TMenuItem;
...
      Device := TMenuItem.Create(Devices);
      Device.Caption := SysDev.Filters[i].FriendlyName;
      Device.Tag := i;
      Device.OnClick := OnSelectDevice;//onselectDevice这个事件你需要预先建立。在这一点上各种编程语言都一样，事件内容必须得事先建立。
      Devices.Add(Device);