编程开发论坛 - Powered by Discuz! Board

标题: [转帖]怎么向动态菜单加入程序 [打印本页]

作者: ljw9128 时间: 2006-11-13 08:48 标题: [转帖]怎么向动态菜单加入程序

请问怎么向动态菜单中加入程序
--------------------------------------------------------------------------------
作者：郭宝利　　来源：原创　　日期：2004.08.09　

请问怎么向动态菜单中加入程序！
菜单是动态加的，但是需要在点这个动态菜单时运行某个程序，怎么加呀。谢谢！
实现思路如下：
1、创建一个菜单，该菜单用作模板。该菜单只有一项，该菜单项中编写如下脚本：
String ls_winname
window lw_open
ls_winname = this.tag
open(lw_open,ls_winname)
2、在需要动态添加菜单时，调用函数即可。公用函数如下：
  /*-----------------------------------------------------------------
* 函数名称：none gf_add_menuItem(menu am_menu,string as_ItemText,String as_ItemTag)
* 函数作用：在菜单am_menu中追加一个菜单项，新追加的菜单项Text为as_ItemText、Tag为
*          as_ItemTag。
* 返回值：无。
* 编写日期：2004.7.28
* 编写人：达通兴电脑科技郭宝利  www.study01job.com
*----------------------------------------------------------------*/
integer li_Pos
menu lm_temp
li_Pos=upperbound(am_menu.item)+1
lm_temp=create m_template
am_menu.item[li_Pos]=lm_temp.item[1]
am_menu.item[li_Pos].text=as_ItemText
am_menu.item[li_Pos].tag=as_ItemTag
3、如果程序运行过程中还需要改动菜单打开的窗口，则修改菜单项的tag属性就可以了。

欢迎光临编程开发论坛 (http://bbs.lihuasoft.net/)