这个问题难吗？根据MENU_LIST表中的‘动作’列的值来写菜单及按钮事件。

表MENU_LIST
MNBH     MNNAME  EVENT
0001    日报表   kqrb.show
0002    汇总表   kqhz.show
我现在的做法是这样子的：
在主窗体onshow时    qryM.First;
    for I:=0 to qryM.RecordCount-1 do
    begin
      MM:=TMenuItem.Create(Self);
      MM.Name := qryMMNBH.Value;
      MM.Caption := '['+qryMMNNAME.Value+']';
      Main_Menu.Items.Add(MM);      ADOQM.Next;
    end;这样子做的话，菜单项是出来了，可是菜单项的单击事件却没有。要怎么做呢。