要求达到任意一个菜单项可以与任一个功能项匹配,对菜单进行功能定制。

解决方案 »

  1.   

    可以用动态链接库DLL形式将功能做到DLL文件中去。
      

  2.   

    不包括外部程序。
    我原来想使用
    onclick:='事件',但这样写是错的,
    应为onclick:=事件,这样我就不太好用变量来动态改变了。
      

  3.   

    最简单的方法是利用菜单的 Action 属性
    功能(方法)放入在ActionList中。
      

  4.   

    将菜单放到一个INI中(也可以用数据库),
    然后LOAD相关的DLL就可以了
      

  5.   

    使用包,参考Delphi5程序员编程指南
      

  6.   

    procedure TForm1.FormCreate(Sender: TObject);
    var
      i: integer;
    begin
      for i:=0 to ComponentCount-1 do
        if Components[i] is TMenuItem then
          if (Components[i] as TMenuItem).Caption = N1.Caption then  //N1的Caption是你操作菜单项的Caption
            (Components[i] as TMenuItem).OnClick := Button1Click;
    end;procedure TForm1.Button1Click(Sender: TObject);
    begin
      ShowMessage('Hello World!');
    end;
      

  7.   

    采用access数据库的技术将菜单项名称保存到数据库中,运行时动态载入,其内容可以运行期直接修改。
    采用动态DLL文件的形式将各菜单功能模块动态载入。
    采用数据库技术来实现菜单的使用权限定制。
    可以动态载入图标文件来定制菜单图标。
    根据用户的点击频率智能的调整菜单。
      

  8.   

    您给我一个信箱,我发信给你。
    [email protected]
      

  9.   

    我没有系统的做这个东西。我想我帮不到你了。我想比较简单的方法应该是用DLL实现吧?呵呵。