菜单总是与特定的窗口相连的，所以这里首先创建创建一个窗口MYWINDOW，
打开窗口的属性对话框（图7-2），单击MENU NAME栏旁边的BROWSE按钮，在弹出的SELECT MENU对话框中选择刚才创建的菜单MYMENU，然后单击OK按钮，就为新建的窗口MYWINDOW添加了菜单。接着把属性对话框中的TITLE一栏修改为“THIS IS A MENU TEST PROGRAM”，输好后把WINDOW TYPE中的窗口类型修改为“MDI FRAME WITH MICROHELP”，然后单击OK按钮关闭对话框。最后单击PAINTERBAR工具条上的SAVE按钮，把新建的窗口起名为MYWINDOW 。 这样就把菜单连接到了新建的窗口上。联好菜单后再在窗口中放入一个STATIC TEXT控件，并且把控件的标题修改为“ITS BACKCOLOR WILL BE CHANGED”，将利用菜单来修改这个控件的背景颜色。接下来就可以编写脚本了。
图7-2
首先为程序的打开事件编写脚本，单击POWERBAR工具条上的APPLICATION按钮，打开MENU-SAMPLE应用对象，单击PAINTERBAR工具条上的SCRIPT按钮，确定SCRIPT画板中打开的是应用对象的OPEN事件，在工作区中输入以下脚本：
OPEN（MYWINDOW）
这个脚本的作用是在启动应用对象的时候打开MYWINDOW窗口。
接着打开MYMENU菜单对象，要为其中的每一个菜单项编写脚本。鼠标单击激活EXIT菜单项，然后单击PAINTERBAR工具条上的SCRIPT按钮，系统弹出SCRIPT画板，为EXIT菜单项的CLICKED事件输入如下脚本：
CLOSE（PARENTWINDOW）
脚本的作用是关闭菜单的父窗口，也就是这里的主窗口，这样就可以结束应用程序。
接下来激活BEEP菜单项，在它的SCRIPT画板中输入以下的脚本
BEEP（100）
脚本的作用是让计算机的扬声器叫一百次。
激活BLUE菜单，为它定义以下的脚本
MYWINDOW.ST_1.BACKCOLOR=RGB(0,0,255)
这段脚本的作用是当选中BLUE菜单项后把静态文本框的背景颜色修改为兰色，脚本中的RGB函数就是用来产生兰色的。
激活WHITE菜单，为它定义以下的脚本
MYWINDOW.ST_1.BACKCOLOR=RGB(0,0,0)
这段脚本的作用是当选中WHITE菜单项后把静态文本框的背景颜色修改为白色，脚本中的RGB函数就是用来产生白色的。
激活YELLOW菜单，为它定义以下的脚本
MYWINDOW.ST_1.BACKCOLOR=RGB(255,255,0)
这段脚本的作用是当选中YELLOW菜单项后把静态文本框的背景颜色修改为黄色，脚本中的RGB函数就是用来产生黄色的。
定义好菜单项的脚本后单击PAINTERBAR工具条上的SAVE按钮保存对MYMENU菜单的修改。接下来就可以运行应用程序了。
|