一个很菜的问题，只要你花一分钟的时间就能马上帮到我。

Question

请问一菜单问题如下。我用动态代码实现为菜单添加新的菜单组，但我要如何在点击新增菜单时触发事件？例：我在运用程序中动态增加一个菜单名为‘abcd‘这个菜单，然后我想点击这个菜单时，edit1.text的内容会变成'abcd'怎么实现 点击触发事件  这一步？望高手指教，急~~~

Answer 1

用以下的方法：
1、定义一个过程：
  procedure MyClick;
begin
  Edit1.Text := 'asdf';
end;2、在生成菜单的同时为菜单指定单击事件：
  Menu1.OnClick = MyClick;
OK!!!

Answer 2

写错了，应为：
Menu1.OnClick := MyClick;