精品PPT课件--第8章面向对象程序设计(控件).pptVIP

§8.3　表单控件设计 1．控件分类 VFP“表单控件”工具栏上有21个基类控件，按功能可分成以下5类： （1）输出类：标签、图像、线条、形状。 （2）输入类：文本框、编辑框、微调控件、列表框、组合框。 （3）控制类：命令按钮、命令按钮组、复选框、选项按钮组、计时器。 （4）容器类：表格、页框、Contain容器、表单集。 （5）连接类：ActiveX控件、ActiveX挷定控件、超级链接控件。 2．各类控件的缺省名称 各类控件的缺省名称见表8－10。 2．各类控件的缺省名称 各类控件的缺省名称见下表。 标签控件(Label)常用于显示说明信息和对象的标题。 1．标签常用属性 标签的常用属性见下表： 1．图像（Image） （1）图像控件的作用 图像控件用于在其中显示图像文件的图片。 （2）图像常用属性 图象对象常用属性见下表： 2．线条（Line） （1）线条控件的作用 线条控件用于在表单上创建直线或斜线。默认创建一条。 （2）线条常用属性 线条对象常用属性见下： 3．形状（Shape） （1）形状控件的作用 形状控件用于在表单上创建圆、椭圆、正方形、矩形、圆角正方形和圆角矩形等几何形状。 （2）形状设置 形状对象常用属性见下表： 4．应用举例 【例8－8】设计一个如图8－41所示的应用程序封面，显示“职工管理系统”和“福建商业高等专科学校研制”，使用图片start.jpg作为封面的背景图案。单击“登录系统”按钮，则打开登录窗口。封面停留半分钟后自动关闭。 （1）设计界面 在表单上创建2个标签Label1与Label2、1个形状控件Shape1、1条水平线Line1、1个计时器Timer1与1个命令按钮Command1。 （2）设置对象属性 在“属性”窗口中，分别设置各对象的属性值如下表： （3）编写事件代码 　1）计时器控件timer1的timer事件代码如下： 　Thisform.Release 30秒后关闭表单 　2）命令按钮Command1的Click事件代码如下： 　DO FORM Login.scx 调用登录表单 （4）保存表单 　以“Start.scx”为名称保存表单。 图8－41　应用程序封面 文本框(Text)又称为输入框,用于输入数据和显示数据,它可接受字符型、数值型、日期型和逻辑型的数据。使用文本框只能输入一段文本。也就是说,按回车键即终止输入。 1．文本框常用属性 文本框常用属性见表8－17。 　Format属性取值见表8－18。 InputMark属性取值见表8－19。 　2．文本框常用方法 SetFocus：文本框获得焦点。 3．文本框常用事件 （1）Valid：在失去焦点之前发生。 （2）KeyPress：按下并释放一个键盘键时发生。 （3）LostFocus：按下并释放一个键盘键时发生。 （4）MouseDown：在该对象按下鼠标时发生。 （5）MouseUp：在该对象释放鼠标时发生。 （6）InteractivateChange：文本框的值时发生。 （1）设计界面 在表单上创建两个标签Label1和Label2，一个文本框Text1和一个命令按钮Command1。 （2）设置数据环境 1）右击表单，在弹出的快捷菜单中选择“数据环境”命令。 2）在弹出的“添加表或视图”对话框中，选择Zgjk.dbf表，单击“添加”按钮，将其添加到“数据环境设计器”窗口中。 （3）创建字段映像 用鼠标将“数据环境设计器”窗口中Zgjk.dbf表的“姓名”和“基本工资”字段拖放到表单上，从而在表单上产生两个标签控件（lbl姓名，lbl基本工资）和两个文本框控件（txt姓名，txt基本工资）。 2）命令按钮Command1的Click事件代码如下： If !Empty(Thisform.Text1.Value) 若文本框非空 Go Top Locate For 职工号=Alltrim(Thisform.Text1.Value) If Found() Thisform.Label2.Caption=提示：记录找到,相关内容显示如下： Else Thisform.Label2.Caption=提示：未找到相关记录！ Endif Thisform.Refresh 刷新表单 Else Thisform.Label2.Caption=提示：请在文本框中输入