Visual FoxPro 6.0 表单及控件简介
目 录
一、表单
1、建立、编辑、调用和关闭表单
2、表单的常用布局属性
3、表单的常用方法程序
4、表单的自定义方法程序
5、为表单贴背景图
二、控件
1、命令按钮组控件（Commandgroup）
2、标签控件（Label）
3、选项按钮组控件（Optiongroup）
4、复选框控件（Check）
5、微调控件（Spinner）
6、文本框控件（Text）
7、线条控件（Line）
8、形状控件（Shape）
9、编辑框控件（Edit）
10、组合框控件（Combo）
11、表格控件（Grid）
12、计时器控件（Timer）
13、列表框控件（List）
14、容器控件（Container）
15、页框（Pageframe）
三、电子显示牌的设计
1、电子显示牌的表单、形状、标签、计时器属性设定
2、计时器的Time方法程序代码
四、进度条的设计
1、设置进度条的最小值、最大值和初值
2、修改(累加)进度条的初值
3、控制进度条的代码设计
五、颜淡入淡出的设计
1、颜代码的种类
2、用计时器控制对象的颜变化
一、表单
1、建立、编辑、调用和关闭表单
VFP的每个表单有两个磁盘文件，即*.SCX和*.SCT，前者为表单库文件，后者为表单备注文件。可用 USE命令带扩展名打开*.SCX库文件，其中有23个字段，一般不要修改。表单设计器直接操作的是*.SCX表单库文件。
对表单文件改名时，一定要同时修改该表单的两个文件名，否则表单文件打不开。一般可在编辑表单时利用[文件]菜单项的“另存为”功能进行，系统会自动生成两个新的同名表单文件。
（1）建立表单。在VFP主窗口的[文件]菜单项，点击[新建]，在[新建]对话框点击[表单]、[新建文件]，即进入表单设计器状态。
（2）编辑表单。在VFP主窗口的[文件]菜单项，点击[打开]，在[打开]对活框选择文件类型[表单(*.SCX)]，然后从中点击一个表单文件，点击[确定]，进入表单设计器状态。
将鼠标置于表单空白之处，右击可预览执行表单。
（3）调用表单。使用*.PRG 调用表单，命令文件代码非常简单，参考代码如下：
NOTE KNFA.PRG 假定调用的是KNFA.SCX表单文件
CLEAR && 清屏
CLOSE DATA && 关闭已打开的数据文件
WJ=IIF(FILE("KNFA.SCX"),"","KNFA.SCX")
WJ=WJ+IIF(FILE("KNFA.SCT"),””,"/KNFA.SCT")
IF LEN(WJ)>0 && 检查的两个表单文件中有不存在的情况
CT1=WJ+" 该表单文件不存在,不可运行"+CHR(13)
NT2=0+16+0 && [确定]按钮(0),出错图标(16),默认[确定](0)
CT3="调用 KNFA.SCX 表单 [KNFA.PRG]"
=MESSAGEBOX(CT1,NT2,CT3) && 调用自定义对话框
ELSE
CT1="点击 [是] 运行 KNFA.SCX 表单"+CHR(13)
CT1=CT1+"点击 [否] 编辑 KNFA.SCX 表单"+CHR(13)
CT1=CT1+"点击 [取消] 返回主控菜单系统"+CHR(13)
NT2=3+32+0 && [是]、[否]、[取消]按钮(3),询问图标(32),默认[是](0)
CT3="调用 KNFA.SCX 表单 [KNFA.PRG]"
ZDYDHK=MESSAGEBOX(CT1,NT2,CT3) && 调用自定义对话框
DO CASE
CASE ZDYDHK=6 && 选择了[是]
DO FORM KNFA && 运行该表单
CASE ZDYDHK=7 && 选择了[否]
MODI FORM KNFA && 编辑该表单
ENDCASE
ENDIF
RETURN
也可直接用以下命令运行表单：DO FORM 表单文件名 && 调用表单
（4）关闭表单。关闭表单也称释放表单，其代码一般放在表单中的某一个命令按钮[返回]或[退出]的Click（按下并释放鼠标时发生）方法程序或表单的Destroy(释放一个对象时发生)方法程序中，不可放在调用表单的*.PRG程序中。
关闭表单的代码格式一般为：THISFORM.RELEASE
2、表单常用的[布局]属性
编号 | 属性 | 功 能 | 取值范围 | 默认值 | 一般设置 |
1 | AutoCenter | 设置表单运行时在VFP主窗口内首次显示的位置 | .T. - 居中 .F. - 偏左上 | .F. | .T. |
2 | BorderStyle | 设置表单的边框样式 | 0 - 无边框 1 - 单线边框 2 - 固定边框 3 - 可调边框 | 3 | 2 |
3 | Caption | 输入表单顶部的标题文本 | 按需要输入 | ||
4 | Closable | 设置表单顶部右边是否有关闭按钮 | .F. - 无 .T. - 有 | .T. | .T. |
5 | ControBox | 设置表单顶部图标和按钮是否可视 | .F. – 隐藏 .T. – 可视 | 改变button按钮的形状.T. | .T. |
6 | Height | 设置表单高度 | 按需要设置 | ||
7 | MaxButton | 设置表单顶部右边是否有最大化按钮 | .F. - 无 .T. - 有 | .T. | .F. |
8 | MinButton | 设置表单顶部右边是否有最小化按钮 | .F. - 无 .T. - 有 | .T. | .T. |
9 | Picture | 指定表单背景图形文件 | 按需要指定 | ||
10 | ShowTips | 设置表单中的控件是否具有工具提示 | .F. - 无 .T. - 有 | .F. | .T. |
11 | TitleBar | 设置表单顶部的标题栏是否可视 | 0 – 不可视 1 – 可视 | 1 | 1 |
12 | Width | 设置表单的宽度 | 按需要设置 | ||
13 | WindowsState | 设置表单运行时的窗口 | 0 - 普通 1 - 最小 2 - 最大 | 0 | 0 |
注：ShowTips设置为.T.时，可在表单各控件的ToolTipText属性中输入提示信息，在表单运行时，鼠标移动到控件上就会跟随鼠标显示这些提示信息。
设置表单的上述布局属性，可在表单设计器的属性窗口点击鼠标设置，也可在表单的方法程序中用代码设置，如：
WITH THISFORM && 表单对象引用开始
.AutoCenter=.T. && 设置表单首次显示居中
.BorderStyle=2 && 设置表单固定边框
.Caption=”实验02 KMAA.SCX” && 输入表单顶部的标题文本
.Closable=.T. && 设置表单顶部右边有关闭按钮
.ControBox=.T. && 设置表单顶部图标和按钮可视
.Height=250 && 设置表单高度为250
.
MaxButton=.F. && 设置表单不可最大化
.MinButton=.T. && 设置表单可以最小化
.Picture=”Screen.jpg” && 指定表单背景图形文件
.ShowTips=.T. && 设置表单的控件有工具提示
.TitleBar=1 && 设置表单顶部的标题栏可视
.Width=450 && 设置表单宽度为450
.WindowsState=0 && 设置表单运行窗口普通化
ENDWITH && 表单对象引用结束
3、表单常用的方法程序
在表单设计器状态选择表单对象(单击表单空白处)，然后在属性窗口中选定某一[方法程序]，双击该方法程序，即可进入该方法程序的代码窗口，这时可在此窗口输入该方法程序
的代码。也可双击表单的空白处，先进入代码窗口，然后点击右边“过程：”的组合框，从中选定某一方法，从而进入该方法程序的代码窗口，这时可在此窗口输入该方法程序的代码。表单主要有以下常用方法。
（1）Form1.Load（创建表单对象之前发生）。代码内容一般是为本表单一次性设置必要的运行环境和条件。
（2）Form1.Init（创建表单对象时发生）。代码内容一般是本表单各控件不准备刷新的初值、可视性（Visible）、可操作性（Enabled）以及其他各种属性设置，检查本表单运行所需要的磁盘文件是否都存在等。
在本表单有关按钮的Click方法程序中，可用以下代码调用本表单Form1.Init的代码：Thisform.Init
（3）Form1.Refresh（重新绘制表单或控件并刷新为初值）。代码内容一般是本表单各控件可刷新的初值、可视性（Visible）、可操作性（Enabled）以及其他各种属性设置。
在本表单有关按钮（重置）的Click方法程序中，可用以下代码调用表单Fmor1.Refresh的
方法程序，以刷新各控件的初值，而不必重复这些代码：Thisform.Refresh
运行表单时，一般会顺序自动执行Form1.Load、Form1.Init和Form1.Refresh方法程序，而不必点击鼠标或按键。
（4）Form1.Destroy（释放表单时发生）。代码内容一般是进行操作登录，清屏，关闭打开的磁盘文件，删除不需要的内存变量，删除运行表单时建立的临时文件，释放本表单。Form1.Destroy的示例方法程序如下：
NOTE Form1.Destroy 释放表单时发生
* 进行操作登录
JMNR="运行实验表单文件：KMAA.SCX" && 注意：此处登记的文件名一定要与本实验表单文件名一致
USE CKRJ
APPEND BLANK
REPL 班级 WITH KJ16+"("+KJ26+")",学号 WITH KJ14,;
操作内容 WITH KJZDJM(JMNR,1),JM WITH .Y.
CLEAR && 清屏
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论