《数据库技术与应用PPT电子教案第七章 表单控件设计》由会员分享，可在线阅读，更多相关《数据库技术与应用PPT电子教案第七章 表单控件设计（37页珍藏版）》请在金锄头文库上搜索。
1、第七章第七章 表单控件设计表单控件设计 控件控件是面向对象程序设计的基本操作单元。是面向对象程序设计的基本操作单元。 控件作用：获取数据控件作用：获取数据 显示数据显示数据 执行命令执行命令 美化界面美化界面 本章内容：表单控件的常用属性、事件和本章内容：表单控件的常用属性、事件和 方法，并以实例形式介绍表单的方法，并以实例形式介绍表单的 具体应用。具体应用。 表单控件可分为表单控件可分为5 5大类大类 1 1）输出类：标签，图象，线条，形状）输出类：标签，图象，线条，形状 2 2）输入类：文本框，编辑框，微调按钮，列）输入类：文本框，编辑框，微调按钮，列 表框，组合框表框，组合框 3 3）控
2、制类：命令按钮，命令按钮组，复选）控制类：命令按钮，命令按钮组，复选 框，选项按钮组，计时器框，选项按钮组，计时器 4 4）容器类：表格，页框，）容器类：表格，页框，ContainerContainer容器容器 5 5）连结类：）连结类：ActiveXActiveX控件，控件，ActiveXActiveX绑定控绑定控 件，超级链接件，超级链接 每个控件均具有若干特征属性，有相同也有每个控件均具有若干特征属性，有相同也有差别，通过属性设置可以设计出满足要求的控件。差别，通过属性设置可以设计出满足要求的控件。 7.17.1输出类控件输出类控件 输出类控件用于在表单上设置文本和图形输出类控件用于在表
3、单上设置文本和图形 一一. .标签标签 LabelLabel 用于在表单上显示提示或说明用于在表单上显示提示或说明 1.1.CaptionCaption属性属性 CaptionCaption属性指定标签标题，即显示的文本内容属性指定标签标题，即显示的文本内容 设置方法：设置方法： 1 1）属性窗口设置）属性窗口设置 CaptionCaption属性属性 2 2）代码命令）代码命令: : THISFORM.LABEL1.Caption=“ THISFORM.LABEL1.Caption=“学生管理系统学生管理系统” 3 3）变量设置：）变量设置： mc=“mc=“学生管理系统学生管理系统” TH
4、ISFORM.LABEL1.Caption=mc THISFORM.LABEL1.Caption=mc mcmc是一个字符型公共变量是一个字符型公共变量 2.2.部分属性部分属性 AutoSizeAutoSize（大小设置）（大小设置）：逻辑型，逻辑型，.T.T.表示自动表示自动 调整大小与文本内容所占空间一致调整大小与文本内容所占空间一致 FontboldFontbold（粗体设置）（粗体设置） .T.T. FontSizeFontSize （字体大小）：（字体大小）：( (默认值默认值 9)9) 3. 3.举例举例7-17-1：创建一个表单，包含一个标签，要：创建一个表单，包含一个标签，要
5、 求求LABEL1LABEL1显示显示“学生成绩管理系统学生成绩管理系统”，且背景，且背景显显 示梅花（示梅花（ 梅花梅花.bmp).bmp)表单设计示意图操作步骤：操作步骤：1)1)命令窗口输入：命令窗口输入：create form create form xscjglxscjgl2)2)添加标签控件添加标签控件 Label1Label13)3)各对象属性设置各对象属性设置Form1 Form1 picture picture 梅花梅花.bmp.bmpLabel1 Label1 captioncaption 学生成绩管理系统学生成绩管理系统Label1 Label1 FontSizeFont
6、Size 26 26Label1 Label1 FontnameFontname 楷体楷体Label1 Label1 AutosizeAutosize .T. .T.Label1 Label1 BackstyleBackstyle 0 4)4)保存表单并运行保存表单并运行7.2 7.2 输入类控件输入类控件文本框，编辑框，微调按钮，列表框，组合框文本框，编辑框，微调按钮，列表框，组合框一一. .文本框（文本框（text)text) 文本框供用户显示、输入或编辑数据（数值文本框供用户显示、输入或编辑数据（数值 型、字符型型、字符型 、日期型、逻辑型）、日期型、逻辑型） 1.1.文本框的值文本框的
7、值: :由由ValueValue属性确定属性确定 1 1）属性窗口修改）属性窗口修改ValueValue属性属性 2 2）代码命令）代码命令: : this.valuethis.value=vfpvfp thisform.text1.value=“VFP thisform.text1.value=“VFP Value Value初值类型：数值型初值类型：数值型00、字符型、字符型 无无 、日期型、日期型 、逻辑型、逻辑型.F.F.2. 控件与数据绑定控件与数据绑定 控件的数据绑定指将控件与某个数据源联系控件的数据绑定指将控件与某个数据源联系起来起来ControlSourceControlSou
8、rce属性：属性： 文本框可以与文本框可以与内存变量内存变量、数组数组、和、和表的表的非备注形字段非备注形字段实现数据绑定实现数据绑定1 1）字段：控件的值由字段决定）字段：控件的值由字段决定2 2）变量：控件的值由变量决定）变量：控件的值由变量决定3.3.举例举例: :设计计算圆面积的程序设计计算圆面积的程序操作步骤：操作步骤：1 1）打开表单设计器）打开表单设计器 create form create form jsmianjijsmianji2 2）属性设置）属性设置 Form caption Form caption 计算圆面积计算圆面积Label1 caption Label1 ca
9、ption 请输入圆半径请输入圆半径: :Label2 caption Label2 caption 圆面积圆面积Command1 caption Command1 caption 计算计算Command2 caption Command2 caption 退出退出3)3)事件代码事件代码 Command1Command1的的clickclick事件代码事件代码： r=val(thisform.text1.value)r=val(thisform.text1.value) s=pi()*r*r s=pi()*r*r thisform.text2.value=s thisform.text2.v
10、alue=s Command2 Command2的的clickclick事件代码事件代码： thisform.releasethisform.release4 4）保存并运行表单）保存并运行表单二二.列表框与组合框（列表框与组合框（List Combo) 列表框与组合框都有一个供用户选择的列表，列表框与组合框都有一个供用户选择的列表， 区别在于：区别在于： 列表框任何时候都显示它的列表，而组合列表框任何时候都显示它的列表，而组合 框平时只显示一个项；框平时只显示一个项； 组合框又可分为下拉组合框（准许输入数组合框又可分为下拉组合框（准许输入数 据项）与下拉列表框；而列表框仅有选项据项）与下拉列
11、表框；而列表框仅有选项 功能。功能。 1. 列表框生成器：列表框生成器：指定指定要填要填充到充到列表列表框中框中的项的项用于指定返回值用于指定返回值以及存储返回值以及存储返回值的字段的字段2.2.组合框组合框 供用户在其列表中选择供用户在其列表中选择, ,或人工键入一个值或人工键入一个值. . 组合框和列表框生成器很相似组合框和列表框生成器很相似, ,不再赘述不再赘述. . 列表框与组合框控件的值源类型列表框与组合框控件的值源类型 3.3.举例举例: :例例7-3(p1997-3(p199页页) )列表列表. .scxscx 在列表框中填充在列表框中填充sbsb表的编号、名称两个字段，表的编号
12、、名称两个字段， 要求选定列表框中的任一项，就能使文本框中要求选定列表框中的任一项，就能使文本框中 显示编号字段显示编号字段操作步骤操作步骤: :1)1)打开表单设计器打开表单设计器, ,设置控件以及属性设置设置控件以及属性设置: : command1 caption command1 caption 关闭关闭2)2)打开列表框生成器打开列表框生成器, ,设置列表选项卡和返回值设置列表选项卡和返回值当用户按键盘或鼠标当用户按键盘或鼠标键时触发键时触发3)3)事件代码编写事件代码编写 List1List1的的 Interactive ChangeInteractive Change的代码的代码:
13、 : thisform.text1.value=thisform.text1.value=this.valuethis.value command1command1的的clickclick事件代码事件代码: : thisform.releasethisform.release 5)5)保存并运行表单保存并运行表单 命令按钮与命令按钮组命令按钮与命令按钮组 CommandgroupCommandgroup Command Command一一. .命令按钮的控制作用命令按钮的控制作用 命令按钮用于完成某一特定的操作，其操命令按钮用于完成某一特定的操作，其操 作代码通常放置在命令按钮的作代码通常放置
14、在命令按钮的ClickClick事件中事件中 P206 P206 例例7-77-7 1 1）在表单上创建一个标签和一个文本框）在表单上创建一个标签和一个文本框 控件，命令按钮控件，命令按钮2 2个个 7.3 7.3 控制类控件控制类控件7.3 控制类控件控件n n 命令按钮命令按钮命令按钮命令按钮(Command)(Command) 例例例例7-7 7-7 7-7 7-7 设计一个如图设计一个如图设计一个如图设计一个如图7.87.87.87.8所示的密码输入窗口所示的密码输入窗口所示的密码输入窗口所示的密码输入窗口, , , , 要求最多允许输入要求最多允许输入要求最多允许输入要求最多允许输入
15、3 3 3 3次密码。次密码。次密码。次密码。 (1) (1) (1) (1) 创建一个表单创建一个表单创建一个表单创建一个表单, , , ,然后在其中创建标签和文本框各然后在其中创建标签和文本框各然后在其中创建标签和文本框各然后在其中创建标签和文本框各1 1 1 1个个个个, , , ,命令按钮命令按钮命令按钮命令按钮2 2 2 2个。个。个。个。 (2) (2) (2) (2) 属性设置：见表属性设置：见表属性设置：见表属性设置：见表7.87.87.87.8。 (3) Form1(3) Form1(3) Form1(3) Form1的的的的LoadLoadLoadLoad事件代码编写如下：
16、事件代码编写如下：事件代码编写如下：事件代码编写如下： public i & ipublic i & ipublic i & ipublic i & i用于计算输入次数用于计算输入次数用于计算输入次数用于计算输入次数 i=0i=0i=0i=0 (4) Command1 (4) Command1 (4) Command1 (4) Command1的的的的ClickClickClickClick事件代码编写如下：事件代码编写如下：事件代码编写如下：事件代码编写如下：i=i+1i=i+1i=i+1i=i+1IF THISFORM.Text1.Value=123456 & IF THISFORM.Te
17、xt1.Value=123456 & IF THISFORM.Text1.Value=123456 & IF THISFORM.Text1.Value=123456 & 文本框输入值与文本框输入值与文本框输入值与文本框输入值与123456(123456(123456(123456(预置的密码预置的密码预置的密码预置的密码) ) ) )比比比比较较较较 THISFORM.ReleaseTHISFORM.ReleaseTHISFORM.ReleaseTHISFORM.Release & & & & 本表单从内存释放本表单从内存释放本表单从内存释放本表单从内存释放ELSEELSEELSEELSE I
18、F i3 & IF i3 & IF i3 & IF i3 & 允许输入允许输入允许输入允许输入3 3 3 3次次次次 MESSAGEBOX(MESSAGEBOX(MESSAGEBOX(MESSAGEBOX(密码错密码错密码错密码错, , , ,请重新输入请重新输入请重新输入请重新输入!)!)!)!)THISFORM.Text1.Value= & THISFORM.Text1.Value= & THISFORM.Text1.Value= & THISFORM.Text1.Value= & 为重新输入清空文本框为重新输入清空文本框为重新输入清空文本框为重新输入清空文本框 THISFORM.Text
19、1.Setfocus & THISFORM.Text1.Setfocus & THISFORM.Text1.Setfocus & THISFORM.Text1.Setfocus & 使文本框获得焦点使文本框获得焦点使文本框获得焦点使文本框获得焦点, , , ,就是使光标在其中就是使光标在其中就是使光标在其中就是使光标在其中闪烁闪烁闪烁闪烁 ELSEELSEELSEELSE MESSAGEBOX( MESSAGEBOX( MESSAGEBOX( MESSAGEBOX(密码错密码错密码错密码错, , , ,禁止进入系统禁止进入系统禁止进入系统禁止进入系统!)!)!)!) THISFORM.Rele
20、aseTHISFORM.ReleaseTHISFORM.ReleaseTHISFORM.Release ENDIF ENDIF ENDIF ENDIFENDIF ENDIF ENDIF ENDIF 图7.8 输入密码表单窗口对 象属 性属 性 值说 明Form1Caption=DTOC(DATE()表单标题栏显示当前日期Label1Caption密码：设置标签的显示文本Text1PasswordChar*设置占位符,输入任何字符都显示它Value(无)清空文本框,否则初始时会显示占位符Command1Caption确定设置命令按钮的标题文本Command2Caption取消表表7.8 “密码输
21、入密码输入”属性设置属性设置(5) Command2(5) Command2的的的的ClickClick事件代码编写如下：事件代码编写如下：事件代码编写如下：事件代码编写如下： THISFORM.ReleaseTHISFORM.Release二二.命令按钮的外观设计命令按钮的外观设计 标题：标题：CaptionCaption 字体：字体：FontNameFontName 大小：大小：FontSizeFontSize， 粗体：粗体：FontBoldFontBold 斜体：斜体：FontItalicFontItalic 划线：划线：FontUnderLineFontUnderLine三三.命令按钮
22、组及其命令按钮的操作命令按钮组及其命令按钮的操作 1.Click1.Click事件的判别事件的判别 VFPVFP必须区分操作的是命令按钮组控件还是组必须区分操作的是命令按钮组控件还是组 内的哪个命令按钮，以便执行相应的动作内的哪个命令按钮，以便执行相应的动作 1 1）命令按钮组及其所包含的各命令按钮分别设）命令按钮组及其所包含的各命令按钮分别设 置置ClickClick事件代码事件代码单击组内空白处，触发组控件的单击组内空白处，触发组控件的ClickClick事件事件 单击组内某个命令按钮，触发该命令按钮的单击组内某个命令按钮，触发该命令按钮的 ClickClick事件事件2 2）命令按钮组的
23、）命令按钮组的ClickClick事件代码根据事件代码根据ValueValue属性值属性值 判断。单击组内某个命令按钮时，组控件的判断。单击组内某个命令按钮时，组控件的 ValueValue属性就返回一个数值（设置为属性就返回一个数值（设置为1 1时，依按时，依按 钮顺序号）或一个字符串（设置为空时，依按钮顺序号）或一个字符串（设置为空时，依按 钮的钮的CaptionCaption属性）属性）3)3)容器中对象的引用容器中对象的引用THISFORM.Commandgroup1.Command1THISFORM.Commandgroup1.Command1THIS . Command1THIS
24、. Command12.2.命令按钮组举例命令按钮组举例例如图7.11中，Commandgroup1Commandgroup1的的ClickClick事件代码编写如下：事件代码编写如下： DO CASEDO CASE CASE CASE THIS.ValueTHIS.Value =1 & =1 & 单击单击Command1Command1命令按钮命令按钮( (下页下页) )返回返回.T.T. IF IF recnorecno()()1 & IF RECNO()1 & 防止上移出界防止上移出界 SKIP -1SKIP -1 ENDIF ENDIF THISFORM.RefreshTHISFORM
25、.Refresh CASE CASE THIS.ValueTHIS.Value =3 & =3 & 单击单击Command3Command3命令按钮命令按钮( (退出退出) )返回返回.T. .T. THISFORM.ReleaseTHISFORM.Release & & 表单从内存释放表单从内存释放 ENDCASEENDCASE图7.9 命令按钮组生成器的按钮选项卡图7.11 “修改SB表数据”表单窗口7.4 7.4 容器类控件容器类控件 表格、页框和表格、页框和ContainerContainer容器均可用表单控容器均可用表单控件工具栏中相应的按钮来创建件工具栏中相应的按钮来创建. . 表
26、格控件用于显示表中的字段，用户可以修表格控件用于显示表中的字段，用户可以修改表格中的数据，改表格中的数据，VFPVFP用用GridGrid来表示表格来表示表格. .一一. .表格的组成表格的组成 1.1.表格（表格（Grid)Grid)：由一或若干列组成：由一或若干列组成 2.2.列（列（ColumnColumn）：一列显示一个字段，由列）：一列显示一个字段，由列 标题和列控件组成标题和列控件组成 3.3.列标题（列标题（Header1Header1）：）：默认显示字段名默认显示字段名 4.4.列控件（如：列控件（如：Text1Text1）：）：该列的所有单元该列的所有单元 格都可用此控件来显
27、示字段值格都可用此控件来显示字段值 列控件默认为文本框，可修改为与字段列控件默认为文本框，可修改为与字段 类型相容的控件类型相容的控件; ;表格、列、列标题和列表格、列、列标题和列 控件都有自己的属性、事件和方法程序控件都有自己的属性、事件和方法程序二二. 创建表格控件创建表格控件 表格控件创建方法：表格控件创建方法：2 2种种 1.从数据环境创建从数据环境创建 打开表单窗口打开表单窗口在数据环境添加在数据环境添加SB表表用鼠用鼠 标将数据环境中标将数据环境中SB表标题栏拖至表单窗口后表标题栏拖至表单窗口后 释放。释放。2.利用表格生成器创建利用表格生成器创建 用表单工具栏的表格控件在表单上创
28、建一个用表单工具栏的表格控件在表单上创建一个 表格表格从表格控件的快捷菜单选择生成器命从表格控件的快捷菜单选择生成器命 令令在生成器对话框设置表格属性在生成器对话框设置表格属性3.3.表格生成器表格生成器 表格生成器有表格生成器有4 4个选项卡个选项卡1 1）“表格项表格项”选项卡：指定表格中显示的字段选项卡：指定表格中显示的字段（2 2）“样式样式”选项卡：选项卡： 指定表格显示的样式指定表格显示的样式 （3 3）布局选项卡）布局选项卡 指定列表标题和表示字段的控件指定列表标题和表示字段的控件（4 4）“关系关系”选项卡选项卡 指定两个表之间的关系指定两个表之间的关系 例例例例7-147-1
29、47-147-14 设计一个如图设计一个如图7.167.16所示的表单所示的表单, ,要求能按部门浏览所有设备数据。要求能按部门浏览所有设备数据。(1) (1) 创建表单创建表单, ,并在数据环境中建立如图并在数据环境中建立如图7.17 7.17 所示所示4 4个表的两级一多关系。个表的两级一多关系。(2) (2) 在表单上创建在表单上创建1 1个下拉列表框个下拉列表框,2,2个标签个标签,3,3个表格。表格控件可从数据环境创建个表格。表格控件可从数据环境创建, ,即将数即将数据环境中据环境中SBSB窗口的标题栏拖到表单释放窗口的标题栏拖到表单释放, ,从而产生从而产生GrdSbGrdSb表格
30、。然后可用同样方法创建表格表格。然后可用同样方法创建表格GrdDxGrdDx和和GrdZzGrdZz, ,如图如图7.167.16所示。表格创建后按图调整好表格位置、大小与列宽。所示。表格创建后按图调整好表格位置、大小与列宽。(3) (3) 如图如图7.167.16所示创建矩形框形状控件所示创建矩形框形状控件, ,然后选定格式菜单的置后命令。然后选定格式菜单的置后命令。(4) (4) 属性设置：见表属性设置：见表7.147.14。 (5) Combo1(5) Combo1的的InitInit事件事件: : SELECT SELECT bmdmbmdmGO BOTTOMGO BOTTOMSKIP
31、 & SKIP & 故意将记录指针移到出界故意将记录指针移到出界, ,以使表格在表单运行之初显示空白以使表格在表单运行之初显示空白(6) Combo1(6) Combo1的的ClickClick事件事件: :THISFORM.Label2.Caption=THISFORM.Combo1.Value+THISFORM.Label2.Caption=THISFORM.Combo1.Value+设备情况设备情况 & & 标题例如标题例如“一车间设一车间设备情况备情况”图7.16 按部门浏览设备表单窗口图7.17 两级一多关系数据环境对 象 名属 性属 性 值说 明Form1Caption按部门浏览设
32、备Combo1Style2组合框类型:下拉列表框RowSourceType2值源类型:别名RowSourceBMDM设置值源表ColumnCount2列表显示代码,名称2个字段BoundColumn2设定第2列为value值GrdSb,GrdDx,GrdZzReadOnly.T.3个表格设置只读GrdSb.Column1.Header1Caption设备编号GrdDx.Column1.Header1Caption大修设备GrdZz.Column1.Header1Caption增值设备Label1Caption请选择部门：AutoSize.T.FontSize14Label2Caption设 备 情 况用于表单运行之初显示标题FontSize11Shape1SpecialEffect0以3维形式显示形状框表表7.14 “按部门浏览设备按部门浏览设备”属性设置属性设置
