复件 vfp面向对象程序设计2new

《复件 vfp面向对象程序设计2new》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、财管VFP33-34学时(面向对象程序设计2)2009-12-18对象是构成程序的基本单位和运行实体。在VFP中，控件可分为控件和容器两种。属性是对象的特征。有两种设置方法。事件是对象可以识别的动作。事件触发的方式三种：用户行为（如单击）；系统（如时钟）；由代码引发（如调用方法程序CLS）一旦触发事件，就按照预先规定的方法去执行某个过程。用户不能创建新的事件。方法是系统内定的通用过程。方法程序代码由VFP定义，用户不可见。如CLS。用户可以为对象扩充新的方法。总结：一个对象有多个属性，一个对象可以有多个事件，每个事件都要有一个动作（方法程序）。而一个应用程序会包含多个对象。

2、例1、Circle方法与系统事件的时间顺序（Activate事件在load事件之后）方法类事件代码窗口的命令，即可以直接在该事件上书写，也可以由引起该方法的事件触发。form1-Activate：this.circle(50,100,50)&&画圆（半径50，横X轴圆心坐标100，Y轴50）&&此时引发form1-circle方法form1-load：thisform.cls&&程序运行后，可见到圆。如果将两个事件的程序调换，则看不到圆。例2、控件的载入时间在load事件之后，在Activate和int事件之前①form1-clickthisform.text1.value

3、="中国人民"&&正常显现②form1-loadthisform.text1.value="中国"&&“不能识别的成员text1”③form1-Activatethisform.text1.value="中国"&&正常显现④form1-int14thisform.text1.value="中国"&&正常显现学习方法：试验。思考：activate和int事件哪个在前，哪个在后呢？一、控件分述1、图象Image——输出类控件在表单中引入图像控件image后，有两种方法显示图像：A．选中该控件，在“属性/Picture”设置框右的对话框中寻找VFP98中的狐狸头（Fox.bmp）

4、，运行。或Windows的Bluehills图像。注意1、当找到该图时，在属性设置框中同时显示了图像的路径。注意2、手拖使图像的左上角在表单的0，0位置。注意3、可以设置图像的height和width属性，使之适合表单的长宽。B．进入该控件的代码框，写入：thisform.image1.picture="c:programfilesmicrosoftvisualstudiovfp98fox.bmp"2、标签Label——输出类控件Backstyle=0：与表单背景色一致。（此时Backcolor的设置无效）Borderstyle：使标签带有边框；AutoSize：使

5、标签区域自动调整为与标题文本大小一致。①引入两个标签：label1、label2②label1的Caption在属性窗口设置“姓名”，再设置字号、字体、颜色。Backstyle属性设置为0，即透明。③label2的Caption属性在程序代码中设置label2-click：this.caption="生日"this.fontname="隶书"this.fontsize=15this.autosize=.t.this.Backstyle=03、文本框Text——输入类控件。可以输入或编辑数据。A、Value属性：用于指定文本框的值，并显示。该值可以在属性窗口设置，也可以代码方

6、式命令设置：this.value=”vfp”。值可以为数值、字符、日期或逻辑型。B、默认字符型。可以右击/生成器/数据类型：选择数值型。①引入两个文本框text1、text2②将text2右击/生成器/数据类型：日期型。144、命令按钮组Commandgroup①引入Commandgroup1②右击/生成器/按钮数，纵向或水平布局③右击/编辑/单选某按钮：设置属性及写代码。5、ActiveX绑定控件——显示表的通用型字段（OLE对象的链接与嵌入）①数据环境引入xsxx表（数据环境表的概念必考）②两个文本框：controlsource属性手写为xsxx.姓名，xs.出生日期③

7、加入ActiveX绑定控件oleboundcontrol用于显示照片。属性设置是：controlsource：xsxx.照片strench：2-变比填充（或其它）Autoactive：2-双击（当无照片时，添加照片的操作）④命令按钮“下一个”-click()ifnoteof()skipelsegotopendifthisform.refresh&&将表单刷新或在“下一个”按钮：skipthisform.text1.refresh&&姓名同步变化thisform.text2.refresh&&学号同步变化命令按钮“上