[color=#E6421A]还要告诉大家,郭宝利又到www.study01job.com论坛中解答问题了.[/color]

请问怎么向动态菜单中加入程序

--------------------------------------------------------------------------------
作者:郭宝利  来源:原创  日期: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属性就可以了。