首页 > 其他 > 详细

弹出上下文菜单

时间:2014-05-10 18:02:22      阅读:383      评论:0      收藏:0      [点我收藏+]
弹出上下文菜单

m_Main  m_menu_pop

m_menu_pop =create  m_Main
 
integer Px,Py  //设置弹出菜单位置
Px = this.x+ PointerX()
Py = this.y +PointerY()
 
m_menu_pop.PopMenu(Px,Py)
destroy m_menu_pop
return 0

 如果在父窗口w_parent右击子窗口w_son后弹出上下文菜单,点击该菜单的 "打开窗口" 选项后弹出另一个窗口w_else,则应该在w_son中新定义一个事件ue_Pop_Window,在该事件中写以下script脚本:
open(w_CK)
 
在else的clicked的script脚本事件中写:
ParentWindow.Post Event Dynamic ue_Pop_else_Window()
 
注:
1、不能在w_parent或w_else窗口中写定义新事件,否则无效。
2、也可以直接在else的clicked的script脚本事件中写:open(w_else)即可。
3、ParentWindow.Post Event Dynamic Event() //有Event为调用事件,无Event为调用函数。

弹出上下文菜单,布布扣,bubuko.com

弹出上下文菜单

原文:http://www.cnblogs.com/lishk/p/3720078.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!