第10章窗口及控件2-游标

1、第10章 窗口(chungku)对象利用下拉列表框和游标技术实现系统登录功能，界面(jimin)如下：共二十三页下拉列表框和游标(yubio)技术与下拉列表框类似(li s)控件列表框ListBox名称前缀：lb_图形列表框PictureListBox名称前缀：plb_下拉图形列表框DropDownPictureListBox名称前缀：ddplb_共二十三页下拉列表框和游标(yubio)技术与下拉列表框类似(li s)控件比较图形列表框和图形下拉列表框比其他两种多一个图片，属性中为Pictures标签页中设定共二十三页下拉列表框和游标(yubio)技术下拉列表框属性 名字前缀：ddlb_列表项

2、：items标签页中列出AllowEdit：选中后，允许用户编辑列表项ShowList：选中后，下拉列表框仅用于列表显示，不具备下拉功能。相当于列表框。事件Selectionchanged事件：改变选项后触发该事件DoubleClicked事件：双击某选项时触发Modified事件：列表框编辑确认后触发GetFocus事件：下拉列表框获得焦点(jiodin)时 触发LoseFocus事件：失去焦点时触发共二十三页下拉列表框和游标(yubio)技术下拉列表框常用函数：关于列表项的操作Additem( )在列表项的尾部追加一个新的列表项，参数为插入项的字符串，如ddlb_1.additem(计算机

3、系)DeleteItem( )在下拉列表框中删除项，参数为列表项的索引号（int类型），例如，ddlb_1.deleteitem(3)为删除列表框中第三项。InsertItem( )在指定(zhdng)的索引号所指的列表项之前插入新的列表项，例如，ddlb_1.insertitem(“副研究员”,3)，即在第三项之上插入“副研究员”FindItem( )Integer listboxname.FindItem ( text, index )共二十三页下拉列表框和游标(yubio)技术下拉列表框常用函数：关于列表项的操作FindItem( )定义 Integer listboxname.Find

4、Item ( text, index )含义：从index指示(zhsh)的列表项的下一项开始查找包含text字符串的第一个列表项，index=0表示从所有列表项中查找。返回值为满足条件的第一个列表项的索引。例如：Integer indexindex=ddlb_1.FindItem ( “副”, 0 )则index=1index=ddlb_1.FindItem ( “副”, 1 )则index=8共二十三页下拉列表框和游标(yubio)技术列表框常用函数：关于列表项的操作(cozu)listboxname.SelectedItem ( )功能：得到选中的列表项，仅用于列表框和图片列表框参数：无

5、返回值：string类型，返回列表框中当前被选中的列表项字符串；如果没有任何项被选中，则返回空串；如果列表框为空，则返回空值，即NULL例如，string texttext=lb_1. SelectedItem ( )则，返回“工程师”下拉列表框和图片下拉列表框利用Text属性取值，如ddlb_1.text共二十三页下拉列表框和游标(yubio)技术游标技术 （读取多行数据）当需要读取多条记录时，就需要使用游标进行操作。其典型(dinxng)运用过程一般为： （1）用DECLARE声明游标；（2）用OPEN语句打开游标；（3）使用FETCH语句读取一行数据；（4）处理数据；（5）判断是否已经读

6、完所有数据，未读完时重复执行（3）（5）步；（6）使用CLOSE语句关闭游标。共二十三页游标(yubio)技术1DECLARE语句使用游标前需要用DECLARE语句声明游标，其语法格式为：DECLARE CursorName CURSOR FOR SelectStatementUSING TransactionObject;其中，CursorName是游标的名称，可以使用任何(rnh)有效的标识符来表示；SelectStatement是任何有效的SELECT语句；TransactionObject是事务对象名，缺省时使用SQLCA。共二十三页游标(yubio)技术2OPEN语句(yj)OPEN

7、语句打开已经声明的游标并执行相应的SELECT语句。其语法格式为：OPEN CursorName;其中CursorName是已经用DECLARE语句声明的游标名。 3FETCH语句FETCH语句从游标中读取当前记录并把它保存到指定的变量中。当数据库支持下述用法时，还可以使用FETCH FIRST、FETCH PRIOR、FETCH LAST。FETCH语句的语法格式为：FETCH CursorName INTO HostVariableList;其中CursorName是OPEN语句打开的游标名，HostVariableList是与SELECT语句中选择字段相对应的绑定变量列表。共二十三页游标

8、(yubio)技术4CLOSE语句CLOSE语句关闭先前打开(d ki)的游标。其语法格式为：CLOSE CursorName ;其中CursorName是先前打开游标的名称。关闭游标后，就不能再使用FETCH语句从游标中读取数据了。共二十三页如果需要在程序中连接数据库就必须通过嵌入式SQL来完成，有时候我们需要在程序中直接使用SQL语句操作数据库。PowerScript提供了一整套嵌入式SQL语句。PowerScript支持在程序中使用嵌入式SQL语句，并且支持在SQL语句中使用具体数据库管理系统（DBMS）特有的SQL语句、函数和保留字，实际上，对于SQL语句，PowerBuilder在将

9、其发送到DBMS之前，并不做任何处理，而由DBMS完成相应操作，最后(zuhu)PowerBuilder得到处理结果。嵌入式SQL语句(yj)共二十三页整个SQL语句可以写在一行，也可以写成更清晰易懂的多行格式，不需使用断行续行符，只要在整个语句结束(jish)处加上一个分号（；）即可。在SQL语句中可以使用常量或合法的变量，但使用变量时须在变量前加个冒号（：）（通常称做绑定变量），多个变量或常量之间用逗号（，）分隔。嵌入式SQL语句(yj)共二十三页一 数据库连接的建立(jinl)与断开1使用CONNECT建立与数据库的连接CONNECT是每个访问数据库的PowerBuilder程序必须使用

10、的语句，它的功能是通过事务对象将应用程序与数据库建立连接，连接成功后，其它SQL语句和数据窗口才能通过事务对象对数据库进行操作。CONNECT语句的语法格式为：CONNECT USING TransactionObject;其中，TransactionObject是事务对象，在执行该语句前，必须正确设置事务对象的数据库连接属性。方括号（ ）表示该成分可以省略，省略时使用默认的事务对象SQLCA。 共二十三页2使用DISCONNECT断开与数据库的连接DISCONNECT语句断开与数据库的连接，执行(zhxng)该语句时，它首先执行(zhxng)COMMIT语句（事务提交语句），完成事务提交，然

11、后断开与数据库的连接。DISCONNECT语句的语法格式为： DISCONNECT USING TransactionObject;其中，TransactionObject是前面用CONNECT语句连接的事务对象名。 共二十三页二 提交与回滚事务1提交事务语句COMMITCOMMIT语句提交事务，完成数据库的物理修改。执行该语句后，将关闭所有先前打开的游标（CURSOR）和过程（PROCEDURE），并开始(kish)一个新的事务。COMMIT语句的语法格式为：COMMIT USING TransactionObject;其中，TransactionObject是事务对象名，缺省时使用事务对象

12、SQLCA。2回滚事务语句ROLLBACKROLLBACK（回滚）语句放弃自上一个COMMIT、ROLLBACK或CONNECT语句以来的所有数据库操作，关闭所有的游标和过程，并开始一个新的事务。其语法格式为：ROLLBACK USING TransactionObject ;其中，TransactionObject是事务对象名，缺省时使用事务对象SQLCA。 共二十三页三 单行检索语句SELECT单行SELECT语句从数据库中检索一条记录，如果找到多条满足条件的记录，则产生错误(cuw)。其语法格式为：SELECT 字段名列表 INTO 变量列表FROM 表名 WHERE 检索条件USING

13、 事务对象名称;例如(lr)：select count(*)into :snamefrom passwordwhere name=:name and pass=:pwd;共二十三页嵌入式SQL语句(yj)四 插入语句INSERT其语法格式(g shi)为：INSERT INTO 表名(字段名列表)VALUES (值列表)USING 事务对象名 ;其中，字段名之间用逗号分隔，值列表是列的赋值，程序中可以使用常量，也可以使用绑定变量（PowerScript变量前加个冒号）。例如pwd= 0002Insert into password(name,pass) values (“ 张三”, :pwd)

14、; 共二十三页五 删除语句DELETE其语法格式为：DELETE FROM 表名WHERE 删除条件USING 事务(shw)对象名 ;删除条件，满足该条件的行被删除，事务对象名缺省时使用SQLCA。例如: name=sle_1.textDelete from password Where name=:name;Delete from password where name= 张三共二十三页六 修改语句UPDATEUPDATE语句修改表中指定的数据(shj)，其语法格式为：UPDATE 表名SET 字段名 =值 ,字段名 = 值 ,.WHERE 更新条件USING 事务对象名 ;例如updat

15、e xschSet score=score+10,bkscore=0Where left(xh,5)= 02511 and course_no= 00005 ;共二十三页七 检查SQL语句的执行情况每当执行一条SQL语句后，与该语句相关的事务对象的SQLCode属性都给出一个值指示SQL语句的执行是否成功，SQLCode取值为：0 ： 最近一次SQL语句执行成功-1： 最近一次SQL语句执行失败100：最近一次SQL语句没有返回数据当SQLCode的值为-1时（即最近一次SQL语句执行失败时），事务对象的SQLDBCode属性中存放着数据库厂商提供的错误代码、事务对象的SQLErrText属性中存放着数据库厂商提供的错误信息，利用这两个(lin )属性，可以得到出错原因。 共二十三页利用SQL语句完成如下(rxi)功能编辑(binj)掩码单选按钮多行编辑器共二十三页内容摘要第10章 窗口对象。图形列表框和图形下拉列表框比其他两种多一个图片，属性中为Pictures标签页中设定。Selection