复件 VFP面对象程序设计2.docVIP

  • 6
  • 0
  • 约 14页
  • 2017-03-05 发布于贵州
  • 举报
复件 VFP面对象程序设计2

财管VFP33-34学时 面向对象程序设计2 2009-12-18 对象是构成程序的基本单位和运行实体。在VFP中,控件可分为控件和容器两种。 属性是对象的特征。有两种设置方法。 事件是对象可以识别的动作。事件触发的方式三种:用户行为(如单击);系统(如时钟);由代码引发(如调用方法程序CLS) 一旦触发事件,就按照预先规定的方法去执行某个过程。用户不能创建新的事件。 方法是系统内定的通用过程。方法程序代码由VFP定义,用户不可见。如CLS。用户可以为对象扩充新的方法。 总结:一个对象有多个属性,一个对象可以有多个事件,每个事件都要有一个动作(方法程序)。而一个应用程序会包含多个对象。 例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-click thisform.text1.value 中国人民 正常显现 ② form1-load thisform.text1.value 中国 “不能识别的成员text1” ③form1- Activate thisform.text1.value 中国 正常显现 ④ form1-int thisform.text1.value 中国 正常显现 学习方法:试验。 思考:activate和int事件哪个在前,哪个在后呢? 一、控件分述 1、图象 Image——输出类控件 在表单中引入图像控件image后,有两种方法显示图像: A.选中该控件,在“属性/Picture”设置框右的对话框中寻找VFP98中的狐狸头(Fox.bmp),运行。或Windows的Blue hills图像。 注意1、当找到该图时,在属性设置框中同时显示了图像的路径。 注意2、手拖使图像的左上角在表单的0,0位置。 注意3、可以设置图像的height和width属性,使之适合表单的长宽。 B.进入该控件的代码框,写入: thisform.image1.picture c:\program files\microsoft visual studio\vfp98\fox.bmp 2、标签 Label——输出类控件 Backstyle 0:Backcolor的设置无效) Borderstyle:AutoSize:this.fontsize 15 this.autosize .t. this. Backstyle 0 3、文本框 Text——输入类控件。可以输入或编辑数据。 A、 Value属性:用于指定文本框的值,并显示。该值可以在属性窗口设置,也可以代码方式命令设置:this.value ”vfp”。值可以为数值、字符、日期或逻辑型。 B、 默认字符型。可以右击/生成器/数据类型:选择数值型。 ① 引入两个文本框text1、text2 ② 将text2右击/生成器/数据类型:日期型。 4、命令按钮组Commandgroup ① 引入Commandgroup1 ② 右击/生成器/按钮数,纵向或水平布局 ③ 右击/编辑/单选某按钮:设置属性及写代码。 5、ActiveX绑定控件——显示表的通用型字段(OLE对象的链接与嵌入) ① 数据环境引入xsxx表 (数据环境表的概念必考) ② 两个文本框:controlsource属性手写为xsxx.姓名,xs.出生日期 ③ 加入ActiveX绑定控件oleboundcontrol用于显示照片。属性设置是: controlsource:xsxx.照片 strench:2-变比填充(或其它) Autoactive:2-双击(当无照片时,添加照片的操作) ④ 命令按钮“下一个”-click if not eof skip else go top endif thisform.refresh 将表单刷新 或在“下一个”按钮: skip thisform.text1.refresh 姓名同步变化 thisform.text2.refresh 学号同步变化 命令按钮“上一个” skip-1 thisform.text1.refresh 姓名同步变化 thisform.text2.refresh 学号同步变化 ⑤ 如无照片需添加

文档评论(0)

1亿VIP精品文档

相关文档