第8章 表单高级设计8.1 多表单应用程序.pptVIP

第8章 表单高级设计8.1 多表单应用程序 应用程序界面 单文档界面与多文档界面 顶层表单与子表单 非浮动表单和浮动表单 调用子表单：DO FORM命令 [例8-1] 为例7-10设计的表单增加一个查页命令按钮,要求单击它能打开一个供用户输入记录号的窗口, 如图8.1所示。当指定记录号并单击确定按钮后，新打开的窗口随即关闭，原表单也立即更新记录显示。 (1) 从例7-10的表单文件SBXG.SCX复制出SBBD1.SCX,并将后者打开。 (2) 在SBBD1.SCX的表单窗口Form1中增加命令按钮Command1。 (3) 创建表单文件SBBD2.SCX,并在其表单窗口Form1中创建标签、文本框各1个。 (4) 属性设置：见表8.1。 (5) 在Form1(SBBD1.SCX)的Init事件代码中增加公共变量jlh： PUBLIC yh,mc(10,1),jlh 公共变量jlh用来表示记录号 COPY TO ARRAY mc FIELDS sb.名称 保持原样 GO 1 保持原样 (6) Form1(SBBD1.SCX)中Command1的Click事件代码编写如下： DO FORM sbbd2 调用子表单 GO jlh 记录指针指向在子表单中指定的记录 THISFORM.Refresh 父表单更新 (7) Form1(SBBD2.SCX)中Command1的Click事件代码编写如下： jlh=THISFORM.Text1.Value 文本框值赋给公共变量(可事先在文本框中键入一个数) THISFORM.Release 释放Form1(SBBD2.SCX) (8) Form1(SBBD1.SCX)的Unload事件代码编写如下： RELEASE jlh 清除公共变量jlh,程序运行结束公共变量不会自动清除 表单集 使用表单集的优点 表单集的创建与删除 表单集的编辑 [例8-3] 用表单集来实现查看设备大修情况。 (1) 从例7-13产生的表单文件BG.SCX复制出BDJ.SCX,并使后者打开,表单设计器窗口中将会显示“SB表编辑”表单窗口。 (2) 为表单文件BDJ.SCX创建表单集：选定表单菜单的创建表单集命令。 (3) 向表单集添加表单：选定表单菜单的添加新表单命令,表单设计器窗口中就会出现Form2表单窗口。 (4) 在数据环境中添加DX表, 并将SB表与DX表按编号关联起来。 (5) 将数据环境中DX窗口的标题栏拖放到Form2表单窗口,该表单中就会产生一个关于大修的表格。 (6) 将Form2表单的Caption属性值改为“大修情况”。 8.2 用户定义属性与方法程序 用户定义属性 变量属性 创建：打开表单设计器后,选定表单菜单的新建属性 作用域：对表单集中的所有表单都有效 引用格式：THISFORMSET.变量属性名 数组属性 多表单应用程序的有效参数 用PUBLIC设置的公共变量 用户在表单集中自定义的属性 父表单与子表单间的参数传递：DO FORM … WITH …TO命令 用户定义方法程序 创建：表单菜单中选定“新建方法程序”命令 过程代码的编辑 调用基本格式为：THISFORMSET.方法程序名 8.3 类 类的概念 类（class）与对象（object） 基类（base class） 子类（subclass） 用户定义类（user-defined class） 容器类(container classes)和控件类(control classes) 类库（class library） 类的特征 封装特征 子类特征 继承性特征 用户定义类 类的创建 将类添加到工具栏 类的编辑 [例8-7] 创建一个带有确认功能的“退出按钮”类。 (1) 从CommandButton基类新建子类：选定文件菜单的新建命令?在新建对话框中选定“类”选项按钮,然后选定新建文件按钮?在如图8.7所示新建类对话框的类名文本框中键入类名：退出按钮；在“派生于”下拉列表框中选定基类CommandButton；在“存储于”文本框中键入类库的名字：用户控件?选定确定按钮关闭对话框。 (2) 在类设计器中为“退出按钮”类设置属性与事件: 新建类对话框关闭后,随即会弹