向Delphi IDE菜单中插入项，必须用Insert方法，用Add无效

来源：互联网发布：淘宝首页全屏图片尺寸编辑：程序博客网时间：2024/05/21 14:43

最近升级一数据字典工具向导PDMtoGUI，须向IDE中插入菜单项，调试好后，安装完向导运行，怎么样都无法向IDE中插入菜单项。将主要代码片段拷贝到一个普通Exe工程中测试能够插入菜单项。昨晚试了一二个小时，无果。

代码段如下

FAddMenuItem := TMenuItem.Create(nil);
FAddMenuItem.Name := 'miPDMtoGUIz';
FAddMenuItem.Caption := '向导加载管理器';
FAddMenuItem.OnClick := OnClick;
miTools.add(FAddMenuItem);

之后查阅GExport的OTA FAQ中有关插入菜单项的步骤二，说是用Insert方法。试一下成了，特此记录

为弄清原因，查看联机帮助，找不到有用的，D的源码中Add方法也是调用Insert。想来想去，只有一个原因Delphi IDE编译时版本低，TMenuItem无Add方法。

下附向导的早前的演示版本，将Gif文件的扩展名去掉～是一个压缩包。数据库应用开发必备利器！正式版有相关的开发文档和扩展接口，有需要购买的（或Bug报告）请联系我！

下载：

http://download.csdn.net/source/1103728