弹出上下文菜单

时间：2014-05-10 18:04:24 阅读：361 评论：0 收藏：0 [点我收藏+]

弹出上下文菜单

ｍ_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为调用函数。

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

踩

(0)

评论一句话评论（0）

分享档案

更多>

周排行