Board logo

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

作者: 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/) Powered by Discuz! 6.0.0