EX
.子程序 _窗口EX1_鼠标右键按下
.参数 xy坐标, 整数型
.参数 wp, 整数型
菜单.弹出 (, , , , )
.子程序 __启动窗口_创建完毕
菜单.置属性 (到整数 (&菜单事件...2, “操作”, , 0, , , )
菜单.插入项目 (1, 1, “打开文件目录”, , 0, , , )
菜单.插入项目 (1, 1, “退出程序”, , 0, , , )
.子程序 菜单事件....参数 菜单id, 整数型
.参数 事件类型, 整数型
.参数 菜单类型, 整数型
.参数 父菜单id, 整数型
调试输出 (“事件类型:” + 到文本 (事件类型))
调试输出 (“菜单id...” + 到文本 (菜单id))
.如果真 (事件类型 = 14)
.判断开始 (菜单id = 2)
信息框 (“打开文件夹”, 0, , )
.判断 (菜单id