新建菜单事件问题(100分)

inewitem:=TMenuItem.Create(self);//创建窗口的菜单
inewitem.Caption:='我的新建窗口';
Form1.Menu_wins.Add(inewitem);
inewitem.OnClick:=Form1.NewClick;
现在有个问题,"Form1.NewClick"是以字符形式存放在数据库存的,如何转换?

个人愚见：
1.用 判断。
2.把字符串 "Form1.NewClick" 及指针 NewClick 存入 TList，
要用的时候根据字符串查找指针。

加一个通用事件allclick,根据某条件比如inewitem.caption 去读数据库中内容,分发给各个单独事件

allclick(sender:tmenuitem)
begin
if (sender as tmenuitem).caption='xxx' then form1.newclick.execute;
end;