教案-一个实例的开发过程详解(PowerBuilder).ppt

第10章一个实例的开发过程详解 这里给出一个通信录管理程序 用于完成对相关数据的检索 插入 删除 存盘和退出功能 10 1创建新目录在创建应用程序之前 首先在D盘上创建一个名为Study的目录 该目录用来保存数据库文件 工作空间 PBL库文件和PBT目标文件 把应用程序涉及到的所有文件放入一个新建的目录中是个好习惯 10 2创建数据库数据库用于保存通信录的数据 我们使用PowerBuilder8 0自带的ASA7 0数据库管理系统创建事例所需要的数据库 1 单击PowerBar工具栏中的 New 图标 弹出New对话框 2 选择 Database 标签页中的 DatabasePainter 画板图标 单击 Ok 按钮 3 双击 ODBODBC Utilities CreateASADatabase 图标 弹出CreateAdaptiveServerAnywhereDatabase对话框 结束放映 第一页 上一页 下一页 最后一页 10 2创建数据库 4 在connectioninformation分组框中输入如下内容 UserID DBA Password Sql DatabaseName D Study Study db 输入全路径 单击 Ok 按钮 完成数据库的创建 10 3创建数据表10 3 1创建Address数据表Address表是通信录程序的基本数据表 用于保存每个人员的基本信息 表格信息如下页表所示 结束放映 第一页 上一页 下一页 最后一页 10 3 1创建Address数据表 结束放映 第一页 上一页 下一页 最后一页 10 3 1创建Address数据表 1 单击PowerBar工具栏中的 Database 图标 打开Objects窗口 2 选择 ODBODBC Study Tables 图标 单击鼠标右键 弹出如图10 3所示的菜单3 单击 NewTable 菜单项 打开Database画板的Culumns窗口 4 按上页表中内容输入每个字段的字段名 数据类型 字段宽度等 输入完成后单击 Save 按钮 弹出CreateNewTable对话框 5 在TableName文本框中输入address 单击 Ok 按钮即可 10 3 2创建主键主键是表中所有记录相互区别的唯一标识 1 在Objects窗口中选择 ODBODBC Study Tables Address 单击鼠标右键 弹出快捷菜单 2 选择 new primarykey 菜单项 弹出PrimaryKey对话框 3 选择id字段作为Address表的主键 单击 Save 按钮保存即可 结束放映 第一页 上一页 下一页 最后一页 10 3 3为每个字段添加注释 表头和标签 1 在Objects窗口中选择 ODBODBC Study Tables Adress Culumns 会显示出Address表中的所有字段 2 选择id字段 单击鼠标右键 弹出快捷菜单 3 选择 Properties 菜单项 弹出Column属性对话框 4 在General标签页中的Comments文本框中输入 编号 5 在Headers标签页中的Label和Heading文本框中也输入 编号 6 其他字段的注释 表头和标签属性分别输入 操作同上述id字段 在开始添加下个字段之前 系统将会提示是否保存对上一个字段所做的修改 单击 Yes 按钮即可 10 3 4创建编辑风格1 给Sex字段定义RadioButton编辑风格 1 打开数据库画板 单击菜单栏 View ExtendedAttributes 菜单项 弹出ExtendedAttributes对话框 2 选择 EditStyles 选项 单击鼠标右键 弹出快捷菜单 3 单击 New 菜单项 弹出EditStyle对话框 4 在Style下拉列表框中选择RadioButton选项 在Name文本框中输入 Sex 在DisplayValue和DataValue文本框的输入相应内容 如下页图所示 单击 Ok 按钮即可 结束放映 第一页 上一页 下一页 最后一页 10 3 4创建编辑风格 结束放映 第一页 上一页 下一页 最后一页 10 3 4创建编辑风格 2 给Education字段定义DropDownListBox编辑风格步骤同前 输入内容如下图所示 结束放映 第一页 上一页 下一页 最后一页 10 3 4创建编辑风格 3 将编辑风格赋给字段把名称为Sex和Education的编辑风格赋给Sex和Education字段 1 打开数据库画板 在Objects窗口中选择 ODBODBC Study Tables Address columns sex 单击鼠标右键 弹出快捷菜单 选择Properties菜单项 弹出属性窗口 2 在属性窗口中选择EditStyle标签页 在StyleName列表框中选择Sex 单击 Save 按钮即可 3 将Education编辑风格赋给Education字段 步骤同上 10 4创建新工作空间1 单击PowerBar工具栏中的 New 图标 弹出New对话框 2 选择 WorkSpace 标签页中的 WorkSpace 图标 单击 Ok 按钮 弹出NewWorkSpace对话框 3 在文件名文本框中输入工作空间的名称Study 保存在新建目录D Study中 单击 保存 按钮即可 结束放映 第一页 上一页 下一页 最后一页 10 5创建新应用程序 应用程序也称应用 一个应用可以完成一组相关的功能 应用由一系列的PowerBuilder对象组成 应用库是存储PowerBuilder应用的文件 应用对象是用来标识应用 进入应用的入口点 1 单击PowerBar工具栏中的 New 图标 弹出New对话框 2 选择 Target 标签页中的 Application 图标 单击 Ok 按钮 弹出SpecifyNewApplicationandLibrary对话框 3 在ApplicationName文本框中输入应用的名称Study 单击Library文本框 系统将自动设置与应用同名的库文件名和目标文件名 单击 Finish 按钮 即完成应用程序的创建 10 6创建数据窗口对象数据窗口对象是PowerBuilder中的对象 通过它不但可以对数据库中的表进行检索 查询 插入 删除和更新 而且还可以对数据指定显示格式 编辑风格和有效性验证 结束放映 第一页 上一页 下一页 最后一页 10 6创建数据窗口对象 1 单击PowerBar工具栏中的 New 图标 弹出New对话框 2 选择 DataWindow 标签页 弹出包含11种数据显示风格的对话框 3 选择Freeform图标 单击 Ok 按钮 弹出ChooseDataSourceforFreeformDataWindow对话框 4 选择QuickSelect数据源 单击 Next 按钮 弹出QuickSelect对话框 5 选择Tables列表框中的Address表 在Columns列表框中显示出Address表的所有字段 单击 AddAll 按钮 就会选中所有字段 6 单击 Ok 按钮 弹出SelectColorandBorderSettings对话框 在BackgroundColor下拉列表框中选择ButtonFace 在Columns分组框的Border下拉列表框中选择Lowered 7 单击 Next 按钮 弹出ReadytoCreateFreeformDataWindow对话框 列出了所创建的数据窗口的全部设置特性 8 单击 Finish 按钮 弹出Datawindow的Design窗口 如下页图所示 结束放映 第一页 上一页 下一页 最后一页 10 6创建数据窗口对象 Datawindow的Design窗口 结束放映 第一页 上一页 下一页 最后一页 10 6创建数据窗口对象 9 在Design窗口中的每个对象 包括标签和字段都可以用鼠标拖动来调整它们的位置 并且可以像调整窗口的大小一样调整对象的大小和形状 数据窗口最终设计成如下图所显示的那样 结束放映 第一页 上一页 下一页 最后一页 10 6创建数据窗口对象 10 在数据窗口对象中添加命令按钮 选择 Insert Control Button 菜单项 然后在Design窗口空白处单击鼠标左键 将添加一个命令按钮 用鼠标右击命令按钮将弹出一个菜单 选择Properties菜单项 弹出属性窗口 如下图所示 结束放映 第一页 上一页 下一页 最后一页 10 6创建数据窗口对象 11 选择General标签页 清除Text属性 选中ActionDefaultPicture复选框 在Action下拉列表框中选择PageFirst 6 数据项 12 选中命令按钮 用鼠标改变其大小直至合适为止 13 添加其余三个命令按钮操作同前 Action属性依次选择PagePrior 5 PageNext 4 PageLast 7 14 单击 Save 按钮 弹出SaveDataWindow对话框 在DataWindows文本框中输入数据窗口对象的名称d address 单击 Ok 按钮完成创建 10 7创建窗口对象窗口是用户和PowerBuilder应用程序之间主要的交互界面 窗口可用来显示信息 请求用户输入以及响应鼠标或键盘操作 1 单击PowerBar工具栏上的 New 图标 弹出New对话框 2 选择PBObject标签页中的Window对象图标 单击 Ok 按钮 进入窗口画板 画板工作区中的矩形代表要创建的窗口 将窗口矩形用鼠标拖拉到适当大小 3 在窗口中添加数据窗口控件和按钮 首先单击窗口画板工具栏上的下拉式命令按钮 弹出工具栏 选择需要的控件图标 然后单击窗口里想放置控件的地方 适当调整控件的大小和位置 窗口最后调整成为如下页图样子 结束放映 第一页 上一页 下一页 最后一页 10 7创建窗口对象 结束放映 第一页 上一页 下一页 最后一页 10 7创建窗口对象 4 设置窗口属性 选择窗口右击鼠标 将弹出一个菜单 5 选择Properties菜单项 弹出对话框 在Title文本框中输入 通信录 WindowType下拉列表框中选择 main 6 设置数据窗口控件的属性 选择数据窗口控件 Properties窗口就对应数据窗口控件的属性 7 在General标签页中的Name属性缺省值为dw 1 单击DataObject文本框右边的按钮 弹出SelectObject对话框 在DataWindows文本框中选择d address数据窗口对象 单击 Ok 按钮 通过这个属性来建立数据窗口控件与数据窗口对象之间的联系 8 设置按钮的属性 操作同前 General标签页Name属性的缺省值分别为Cb 1 Cb 2 Cb 3 Cb 4和Cb 5 Text属性分别设置为 检索 插入 删除 存盘 和 退出 9 单击 Save 按钮 以名为 w study 存盘 结束放映 第一页 上一页 下一页 最后一页 10 8编写脚本 1 为应用对象的Open事件编写脚本 单击 Window SystemTree 菜单项 弹出系统树窗口 双击应用对象图标弹出脚本编辑窗口 在脚本编辑窗口中有两个下拉列表框 左边的是对象下拉列表框 右边的是事件下拉列表框 分别选择Study应用对象和Open事件 在脚本编辑区书写如下代码 SQLCA DBMS ODBC SQLCA AutoCommit FalseSQLCA DBParm Connectstring DSN Study connect open w study 2 为窗口对象的Open事件编写脚本 用鼠标右击窗口弹出一个菜单 选择Script菜单项 弹出脚本编辑窗口 在对象下拉列表框中选择窗口对象W study 在事件下拉列表框中选择Open事件 在脚本编辑区书写如下脚本 dw 1 settransobject sqlca 3 为检索按钮Cb 1的clicked事件编写脚本 在步骤2弹出的脚本编辑窗口中选择对象Cb 1和事件clicked 在脚本编辑区书写如下脚本 dw 1 retrieve 结束放映 第一页 上一页 下一页 最后一页 10 8编写脚本 4 同步骤3 为插入按钮Cb 2的clicked事件编写如下脚本 longll currentrowll currentrow dw 1 getrow dw 1 insertrow ll currentrow 5 同步骤3 为删除按钮Cb 3的clicked事件编写如下脚本 longll currentrow ll rtnll currentrow dw 1 getrow ll rtn messagebox 提示 你将要删除纪录 是否继续 question yesno 1 ifll rtn 1thendw 1 deleterow ll currentrow endif 结束放映 第一页 上一页 下一页 最后一页 10 8编写脚本 6 同步骤3 为存盘按钮Cb 4的clicked事件编写如下脚本 ifdw 1 update 1thencommitusingsqlca messagebox 提示 数据库更新成功 elserollbackusingsqlca messagebox 提示 数据库更新不成功 endif7 同步骤3 为退出按钮Cb 5的clicked事件编写如下脚本 close parent 至此程序全部完成 结束放映 第一页 上一页