第12讲 表单控件设计

12.2 输入类控件
例3运行结果：
12.2 输入类控件
组合框(Combo)控件 作用：供用户在列表中选项，或手工输入一个值。
特点：平时只显示一个项，用户单击它的向下按钮后 才能显示可滚动的下拉列表（可以节省界面空间）。 组合框可以用组合框生成器来设置属性。生成器的 构成与列表框相同 。
12.2 输入类控件
Thisform.Label1.Top=y+Thisform.Shape1.Height/2-Thisform.Label1.Height/2
6）FORM1.RightClick事件代码：Thisform.Release 7）运行表单。
对象
属性 .T. 2 0 0
属性值 表单最大化
说明 表单设置在桌面上 取消表单边框 取消表单标题栏 表单壁纸 封面文字
第12讲 表单控件设计
12.1 输出类控件
12.2 输入类控件 12.3 控制类控件 12.4 容器类控件 12.5 连接类控件 12.6 习题
12.1 输出类控件 标签（Label）
输 出 类 控 件
图像（Iamge） 线条（Line） 形状（Shape）
12.1 输出类控件
标签（label）控件 作用：在表单上显示文本，进行提示或说明。
分别指定返回值（BoundColumn属性）以及存储返回值的字 段（ControlSource属性）。
由用户决定列表框返回 值的字段或列，对应于 BoundColumn属性。
指定存储返回值的字段， 对 应 ControlSource 属 性 。
列表框生成器的“值”选项卡
12.2 输入类控件
例3：在列表框中填充SB表的编号和名称字段，选定 列表框中的任一项，能使文本框中显示编号字段值。
12.1 输出类控件
注意：
①尽管标题属性是字符型数据，但在属性窗 口输入时不加引号。
②控件属性的修改或设置，可以在属性窗口 进行，也可以在某一事件的代码中实现。
例： THISFORM.LBL名称1.Caption＝“设备名称:”
12.1 输出类控件
图像(image)控件
作用：在表单上创建图像，类型可以是.bmp, .ico, .gif 和 .jpg格式。
1）创建表单，并添加1个列表框控件List1和1个文本框控件 Text1； 2）在数据环境对话框中添加SB表； 2）打开列表框生成器→在列表项选项卡的“用此填充列表” 组合框中选定“表或视图中的字段”选项→选出SB表，将编号 和名称字段添入选定字段列表→“确定”按钮； 3）List1的Interactive Change事件（按键盘键或鼠标键触 发）代码编写如下： Thisform.Text1.Value=This.Value 4）运行表单。
列表框（ListBox）
组合框（ComboBox）
文本框（text）控件 作用：供用户输入或编辑数据。
常用属性 Value属性 Enabled属性 Visible属性 SetFocus属性 GotFocus Event LostFocus Event 属性设置范例 指文本框的显示内容，可以直接在属性窗输入（不加引 号），也可以命令设置：THIS.VALUE=”VFP” 。 该对象是否可用 （对用户触发事件做出反应），.T.可用 该对象是否可见，.T.可见 某个时刻允许被操作的一个对象 获得焦点事件（光标显示） 失去焦点事件
填充项可以是表或视图中的字段、 手工输入的数据或数组中的值之 一。选择的数据类型不同，操作 界面不同。
列表框生成器的“列表项”选项卡一
12.2 输入类控件
选择手工输入数据源，相当于 RowSourceType 为 1 （ 值 ） ， RowSource为按行排列，逗号分隔， 按行接续的数值。
指定表格列数 （ColumnCount属性）， 列宽度可调
例2：设计一个表单，要求当文本框得到焦点时能立 即显示在编辑框中选定的文本。
1）创建表单FORM1，并在表单上创建编辑框Edit1和文本框 Text1控件各1个； 2）在数据环境中添加SB表（右键单击调出快捷菜单，选择 “数据环境”命令，将SB表加入），然后将Edit1编辑框的 ControlSource属性与备注型字段SB.备注绑定； 3）Edit1编辑框的LostFocus事件代码编写如下： This.Hideselection=.F. &&焦点离开后不隐藏文本选定状态 4）Text1文本框的GotFocus事件代码编写如下： This.value=Thisform.Edit1.Seltext 5）运行表单。
注：图像、线条和形状控件只能在设计时设置，但设置好后无 论在设计时还是运行时都可改变其属性。形状控件要注意置后。
12.1 输出类控件
形状(shape)控件 作用：在表单上画出各种类型的形状，包括矩形、 圆角矩形、正方形、圆角正方形、椭圆和圆。
常用属性 Curvature：曲率 属性设置范例 0表示方角（矩形、正方形） 1～99表示圆角（圆角矩形、圆角正方形和 椭圆、圆） 曲率为0时，设置为与宽度不等，为矩形， 与宽度相等为正方形；曲率不为0时，设置 为与宽度不等，为圆角矩形或椭圆，与宽度 相等为圆角正方形或圆 参考高度属性
“值”选项卡：指定用于存储文本框值的字段，相当 于用Controlsource属性进行数据绑定。
字段名组合框：指定数据环境 中提供的表或视图的字段来存 储文本框的值。
Байду номын сангаас
12.2 输入类控件
编辑框（edit）控件
作用：输入或更改文本，并允许输入多段文本。编辑框也可以 用编辑框生成器来设置属性。
12.2 输入类控件
12.2 输入类控件
例2运行结果：
12.2 输入类控件
列表框(list)控件
作用：提供用户选项的列表。任何时候都显示它的列表，且 只能选项。列表框也可以用列表框生成器来设置属性。
选择“数据库 和表”为数据 源，相当于 RowSourceTyp e为6（字段）， RowSource为 逗号分隔的字 段名。
Hideselection
Readonly属性 Inputmask属性 ControlSource属性： 数据源
文本框失去焦点时，取消数据的选定状态
禁止用户更改文本框数据 设置输入掩码 用于为控件绑定数据，即将控件与某个数据源联系起来， 数据源可以是表字段或变量。文本框与数据源绑定之后， 控件值便与数据源的数据一致。
列表框生成器的“列表项”选项卡 二
12.2 输入类控件
选择数组中的值为数据源，相当于 RowSourceType 为 5 （ 数 组 ） ， RowSource为数组名。如选整个数组， 则FirstElement为1，NumberOfElements ＝ Alen （ 数 组 ， 0 ）， ColumnCount ＝ ALEN（数组名，2）
FORM1 Desktop WindowState BorderStyle TitleBar Picture Label1 Caption
C:VFP\GALLERY\GRAPHICS\TOOLS.ICO
汽车修理管理系统
Autosize
FontName FontSize FontBold ForeColor BackStyle Shape1 Curvature BorderColor BackColor
组合框常用属性
Style RowsourceType Rowsource ColumnCount BoundColumn
12.2 输入类控件
选择数据类型
对应Enabled 属性 失去焦点时，取消数 据选定状态
禁止用户更改数据
显示前导零（L） 只允许 字母 选定或设置输入 掩码串 非空文本框获得焦点时， 框中数据选定（K）
“格式”选项卡：设置文本框的数据类型及相应的 格式码，输入掩码。注意类型与格式码的对应。
12.2 输入类控件
“样式”选项卡：指定文本框的外观，边框和字符对 齐方式。
特殊效果选项 按钮组：三维， 平面 调整文本框尺寸以 恰好容纳复选框： 自动调整文本框大 小使其恰好容纳数 据 边框选项按钮 组：单线框， 无边框
字符对齐组合框：指定文本框中数 据的对齐方式：左，右，居中，自 动（默认，根据数据类型对齐）。
12.2 输入类控件
3
4 5
SQL语句SQL statement
查询Query(.QPR) 数组Array
6
7 8 9
字段Fields
文件Files 结构Structures 弹出式菜单Popup
12.2 输入类控件
指定列表框的样式、所显示的行数，是否递增搜索。
指定显示行数， 仅7号字时相符
列表框生成器的“样式”选项卡
指定数组 名，需先 建立数组
选择某一范围的数组，需在此确 定界限，分别选定数组的起始列， 结尾列，起始行，结尾行。
列表框生成器的“列表项”选项卡三
12.2 输入类控件
列表框生成器只列出了三种最常用的RowsourceType，实 际共有10个选项。
RowsourceType 0 1 2 无None 值Value 别名Alias 代表意义
Height：高度
Width：宽度
12.1 输出类控件
例1：设计如图所示的应用程序封面。
12.1 输出类控件
1）创建表单FM.SCX：MODIFY FORM FM（封面）； 2）在表单上创建标签(LABEL1)和形状控件(SHAPE1)各1个； 3）设置控件属性，详见下表； 4）将封面的文字置前于椭圆(布局工具箱，格式菜单)； 5）FROM1.Activate事件代码编写如下： Thisform.Shape1.Width=Thisform.Label1.Width*1.3 Thisform.Shape1.Height=Thisform.Label1.Height*2 x=Thisform.Width/2 y=Thisform.Height/4 Thisform.Shape1.Left=x-Thisform.shape1.Width/2 Thisform.Shape1.Top=y Thisform.Label1.Left=x-Thisform.Label1.Width/2
12.2 输入类控件
用于控制列表框的列宽和显示。双击列标头可以隐藏该 列，但数据仍起作用。
自动设置列表 框 的 Width 属 性，根据指定 的列数自动调 整列表框的宽 度
表格：可以调整列宽，双击列标 头可以隐藏该列，表单执行时不 显示，但数据仍起作用。
列表框生成器的“布局”选项卡
12.2 输入类控件
.T.
宋体 36 .T. 0，0，255 0 99 255，255，0 0，255，255
Label1区域自动适应标题大小
字体 文字大小 粗体 标题颜色为蓝色 背景透明，不显示标签区域 画椭圆，圆角最大 边框颜色为黄色 背景颜色为青色
12.2 输入类控件
文本框（TextBox）
输 入 类 控 件
编辑框（EditBox）
常用属性 Picture：图像属性 属性设置范例 Image1.Picture＝‘c:\VFP\FOX.BMP’
12.1 输出类控件
线条(line)控件 作用：在表单上画出各种类型的线条，包括斜线、水 平线和垂直线。
常用属性 LineSlant：斜线走向 Height：高度 Width：宽度 属性设置范例 \：左上角到右下角（默认） /：右上角到左下角 设置为0表示水平线 设置为0垂直线
12.2 输入类控件
注意： （1）文本框的输入可以是数值型（0），字符型（默 认（无）），日期型（{ }）、逻辑型（.F.）； （2）输入时长数据自动换行，只能输入一段，按回 车键便终止输入。
使用文本框生成器制作控件： 利用生成器为控件设置属性十分方便，但仅能设置 常用属性，不能包括所有属性。文本框生成器包含 “格式”，“样式”，“值”3个选项卡。
常用属性 名字（Name） 标题（Caption）：显示文本 Autosize：自动调整区域大小 Backstyle：背景风格 BorderStyle：边框 WordWrap：标题文字换行 LBL名称1 LABEL1.Caption=“设备名称” LABEL1.Autosize=.T. LABEL1.Backstyle=0（与表单背景一致） LABEL1. BorderStyle=1（单线框），0为 无边框 LABEL1. WordWrap =.T. 属性设置范例