精华区文章阅读

发信人: zhaowei (小燕子), 信区: Database
标  题: 7.3 编写菜单脚本
发信站: 紫丁香 (Fri Jun 11 16:06:26 1999), 转信

打开窗口的属性对话框（图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菜单的修
改。接下来就可以运行应用程序了。

--
我和一个朋友去散步，遇见一个漂亮的少妇带着一个小孩平时极腼腆的朋友一改
平日恹恹睡态，勇敢的走上前去， ∴
         《||||||||||||||||||||■※※◎    亲切的看着那小孩说：
                               ∵    ."   多可爱的孩子啊，
                                 ...''   抬头看看少妇，
                               ~"'     “还有孩子他妈！”

※ 来源:．紫丁香 bbs.hit.edu.cn．[FROM: 202.118.226.249]

Database 版 (精华区)