循序渐进学习Power Builder 6.0(2-6)

核心提示： 2.6 建立应用程序到目前为止，本程序中用到的对象都定义好了，循序渐进学习Power Builder 6.0(2-6)，但程序还不能运行，因为我们还没有为程序编写代码，这里我们把口令设成了“MYPASSWORD”，在实际应用中你可以换成一个自己的口令，这种代码在PowerBuilder中被称为脚本，PowerBuil

 

2.6 建立应用程序

到目前为止，本程序中用到的对象都定义好了，但程序还不能运行，因为我们还没有为程序编写代码，这种代码在PowerBuilder中被称为脚本，PowerBuilder是一种基于面向对象的事件驱动机制开发工具，所以脚本也是针对对象的事件来编写，接下来就为应用程序编写脚本。

PowerBuilder应用程序的特点是从应用对象开始执行程序，所以我们首先要做的是为应用对象的打开事件编写代码，单击POWERBAR工具条上的APPLICATION画板按钮打开应用对象，然后单击PAINTERBAR工具条上的SCRIPT画板按钮，系统弹出SCRIPT对话框用来为应用对象编写脚本，从SELECT EVENT下拉列表框中选择OPEN事件，然后在工作区中输入如下脚本（图2-35）：

SQLCA.DBMS=PROFILESTRING("PB.INI","DATABASE","DBMS","")

SQLCA.DBPRAM=PROFILESTRING("PB.INI","DATABSE","DBPRAM","")

OPEN（TELEPHONE-WINDOW1）

图2-35

解释这段脚本前要先介绍事务对象的概念，这里的SQLCA就是一个系统自动提供的缺省事物对象变量，SQLCA是一个全局变量，可以用在所有的窗口对象中。事物对象的作用是为联结数据库提供有关的信息，以便可以从数据库中获取需要的数据。这段脚本所做的工作是在应用对象启动后首先从POWERBUIDER中存放与数据库有关信息的文件PB.INI中取得需要的值放入事物对象变量中，然后打开TELEPHONE-WINDOW1窗口，以便用户从登录窗口输入正确的密码后可以进入到个人通讯录管理系统。这里就为应用对象编写这三行代码。

单击POWERBAR工具条上的WINDOW画板按钮，选择打开TELEPHONE-WINDOW1，我们开始为它编写脚本，右键单击窗口上的OK按钮，首先在菜单中选择PROPERTIES菜单项来修改OK控件的一个属性，在弹出的对话框中有一个DEFAULT复选框，我们选中它（图2-36），这样在以后程序运行的时候按回车键的效果和单击OK控件就一样了，单击OK关闭对话框，然后再次右键单击窗口上的OK按钮，在菜单中选择SCRIPT菜单项开始为这个命令按钮的单击事件编写脚本，观察窗口的标题确定目前选择的是命令按钮的CLICK事件后在工作区中输入以下的脚本：

if upper(trim(sle_1.text))="mypassword" then

open (telephone_window2)

close(telephone_window1)

else

sle_1.setfocus()

end if

这段脚本所做的工作是当用户在打开的登录窗口中单击OK按钮的时候判断单行编辑框中的字符串在去掉前后的空格符和整个转换成大写字符后是否为字符串“MYPASSWORD”，如果是的就打开我们在前面定义的第二个，也就是用来对个人通讯录数据库进行操作的窗口，然后再关闭登录窗口， 如果输入的字符串与设定的字符串“MYPASSWORD”不符的话就表示用户不能对通讯录数据库进行访问，就把输入焦点切换到编辑框让用户重新输入正确的口令，这里我们把口令设成了“MYPASSWORD”，在实际应用中你可以换成一个自己的口令，这样可以保证自己的数据库的安全性。

图2-36