使用Authorware如何制作弹出式菜单

    2.拖一个计算图标到流程线上，命名为“创建弹出式菜单”；在其中输入如下脚本（----后边是有关程序 脚本的说明）：

---- 下列代码创建弹出式菜单的句柄： popupHandle:=tMsCreatePopupList(WindowHandle) 

---- 下列代码创建弹出式菜单的菜单选项列表： tMsAddItem(popupHandle, 1, 0, "选项 1") tMsAddItem(popupHandle, 2, 0, "选项 2") tMsAddItem(popupHandle, 3, 0, "-") 

---- 在选项 2和选项 3 之间创建一条分隔线 tMsAddItem(popupHandle, 4, 0, "选项 3") tMsAddItem(popupHandle, 5, 0, "选项 4") tMsAddItem(popupHandle, 6, 0, "选项 5") 

---- 下列代码为"选项 2"菜单项创建两个分隔开的子菜单选项，如不需要子菜单，可以省略： tMsAddItem(popupHandle, 2, 1, "子选项 1") tMsAddItem(popupHandle, 2, 2, "-") tMsAddItem(popupHandle, 2, 3, "子选项 2") 

　　3.在计算图标“创建弹出式菜单”之后，建立一个条件交互，命名为“右键响应弹出式菜单”，Condition项设为：RightMouseDown=TRUE，Automatic项设为：On False to True。用一个计算图标响应RightMouseDown事件，在其中输入：

---- 下列代码在右键敲击处，弹出一个前边设定好的弹出式菜单，并将用户反馈（即用户所选择的菜单项）返回给变量result： result := tMsDisplayControl(popupHandle, CursorX, CursorY, 100, 150, 1)

---- 当不需要再使用该弹出式菜单时，可用下列代码将它删掉。

　　　　　　　　tMsDestroyControl(popupHandle)

    4.打包发行你的Authorware作品时，把tMsControls.U32放到主程序所在目录。

    你只需对本实例稍加修改，就可以用到你自己的程序中去了。