VFP及其应用系统开发.pptVIP

第六章 表单设计基础 6.1 表单向导,打开向导选取对话框：在工具菜单的向导子菜单中选定表单命令。,单表表单向导与一对多表单向导,6.2 表单设计器,创建和运行表单的基本步骤 打开表单设计器 MODIFY FORM 文件名 对象操作与编码：表单设计器 ，数据环境设计器 ，表单控件工具栏 保存表单 运行表单：例如 DO FORM SBQ 快速创建表单：表单菜单的快速表单命令,6.3 面向对象的程序设计方法,对象 控件 容器 属性 事件 方法程序,表6.3 属性选列,表6.4 VFP部分常见事件表,方法程序一例：Refresh方法程序 Form.Object.Refresh 功能: 重画表单或控件, 并刷新所有的值。,对象引用,对象引用规则 (1) 通常用以下引用关键字开头: THISFORMSET 表示当前表单集(表单集的概念参阅8.1.2节) THISFORM 表示当前表单 THIS 表示当前对象 (2) 引用格式: 引用关键字后跟一个点号,再写出被引用对象或者对象的属性,事件或方法程序。 例如： THIS.Caption & 本对象(表单或控件)的Caption属性 THISFORM.Cls & 本表单的Cls方法程序,清除表单中的图形和文本 THISFORM.Command1.Caption & 本表单的Command1命令按钮的Caption属性 THIS.Command1.Click & 本对象的Command1命令按钮的Click事件 (3) 控件也可引用包含它的容器,格式为: Control.Parent 其中Control表示控件, Parent表示容器。 例如THIS.Parent.Command1.Caption, 表示引用本对象的容器(例如表单)的Command1命令按钮的Caption属性。,编程方式设置属性值 属性值设置格式: ObjectName.Property=Setting 其中Setting为要设置的属性值。 例如, THIS.FontBold=.T. & 本对象文本以粗体显示 THIS.Parent.Caption = time() & 本对象的容器的caption属性设置为当前时间 例6-4 设计只含一个文本框控件的表单(见图6.17),要求逐次单击文本框的内部能轮流显示当前日期与时间,试写出设计步骤。 (1) 创建表单：往命令窗口键入命令MODIFY FORM rqsj,使显示rqsj表单设计器窗口。 (2）创建文本框: 单击表单控件工具栏中的文本框按钮,然后单击Form1表单窗口内某处,该处就会产生一个Text1文本框控件。 (3) 将表单的Caption属性改为“日期与时间”：单击表单窗口,属性窗口的组合框中便显示Form1在属性列表中选定Caption属性在文本框中输入日期与时间字样,按回车键后表单窗口的标题栏就会显示这些文字。,(4) 表单的Load事件代码的设置: 双击表单窗口打开代码编辑窗口在对象组合框中确定表单选项,并在过程组合框中确定Load事件选项在列表框中输入以下代码： PUBLIC i & Load事件在表单装入内存时触发,设置I为公共变量 (5) 文本框的Click事件代码编写如下: IF i=.T. & 变量I用于控制轮流显示 THISFORM.TEXT1.VALUE=DATE() & 本表单的文本框的值设置为当前日期 THISFORM.TEXT1.DateFormat=12 & 日期格式设置为年月日次序 THISFORM.TEXT1.DateMark=“.“ & 年月日间隔符设置为点号 i=.F. & 触发Click事件I值就变反 ELSE THISFORM.TEXT1.VALUE=TIME() & 本表单的文本框的值设置为当前时间 i=.T. & 触发Click事件I值就变反 ENDIF,第七章 表单控件设计 7.1 输出类控件,标签(Label) 属性选介 (1) 使标签区域自动调整为与标题文本大小一致：可将AutoSize属性设置为.T.。 (2) 使标签的标题竖排：先将WordWrap属性设置为.T.,然后在水平方向压缩标签区域迫使文字换行。 (3) 使标签与表单背景颜色一致：将BackStyle属性设置为0(透明) (4) 使标签带有边框：将BorderStyle属性设置为1(单选框) 图象(Image)、线条(Line)与形状(Shape) 创建图象的步骤如下: 在表单上创建一个图象控件在属性窗口选定Picture属性,并通过文本框右侧的对话按钮选定一个图象, 该图象即显示在图象控件处。 线条控件用于在表单上画各种类型的线条,包括斜线、水平线和垂直线。 形状控件用于在表单上画出各种类型的形状,包括矩形、圆角矩形、正方形、圆角正方形,椭圆或圆。,表7.3 形状控件的形状设置,例7-1 设计如图7.1所示的应用程序封面。 (1) 创建表单FM.SCX。 (2) 在表单上创建标签和形状控件各1个。 (3) 设置属性：详见表7.4 (4) 将封面的文字置前于椭圆：选定Label1,然后在布局工具栏中选