第七章表单控件设计.ppt

第七章表单控件设计,表单控件可分为5大类（1）输出类：标签，图象，线条，形状（2）输入类：文本框，编辑框，微调按钮，列表框，组合框（3）控制类：命令按钮，命令按钮组，复选框，选项按钮组，计时器（4）容器类：表格，页框，Container容器（5）连结类：ActiveX控件，ActiveX绑定控件，超级链接每个控件均具有若干特征属性，有相同也有差别，通过属性设置可以设计出满足要求的控件。,7.1输出类控件,输出类控件用于在表单上设置文本和图形7.1.1标签用于在表单上显示提示或说明一、标签的标题Caption属性指定标签的标题，即显示的文本内容修改方法：（1）属性窗口修改Caption属性（2）代码命令:THISFORM.LABEL1.Caption=“文本内容”（3）变量设置：THISFORM.LABEL1.Caption=mc，mc是一个字符型公共变量,二、部分属性,（1）AutoSize（大小设置）：逻辑型，.T.表示自动调整大小与文本内容所占空间一致（2）BackStyle（背景设置）：0（透明），1（不透明）（3）BolderStyle（边框特性）：0（无（默认值），1（固定单线）用户设置过的属性将以粗体显示,7.1.2图象、线条与形状,一、图象Picture属性可在表单上创建图象，类型可以为.BMP，.ICO，.GIF，.JPG等Picture属性修改方法：（1）属性窗口设定（2）代码命令THISFORM.Image1.Picture=“c:ProgramFilesMicrosoftVisualStudioVfp98fox.bmp”P201表7-1提供了各类图象的位置，文件夹与VFP的的安装位置有关。如上例,选定Picture属性，通过文本框右側的对话框选择图象,二、线条,线条用来在表单上显示斜线、水平线和垂直线1、斜线（1）创建时，默认为左上角至右下角的一条斜线（2）倾斜度与Width属性和Height属性有关（3）LineSlant属性：“”左上角至右下角，“/”右上角至左下角2、水平线和垂直线调整线条控件区域使对应边重合，或调整Width属性和Height属性值，见P202表7-2,三、形状,用来显示各种类型形状：矩型、圆角矩型、正方形、圆角正方形或圆形状类型与Curvature、Width和Height属性有关，见P202表7-3P203例7-1（1）创建表单FM.SCX（2）在表单上创建标签Label1和形状Shape1各一个（3）设置属性，见P203表7-4（4）将封面的文字置前于椭圆：选定Label1，在布局工具栏选定“置前”按钮。,（5）Form1的Activate事件代码编写如下：,thisform.shape1.width=thisform.label1.width*1.3thisform.shape1.height=thisform.label1.height*2x=thisform.width/2y=thisform.height/4thisform.shape1.left=x-thisform.shape1.width/2thisform.shape1.top=ythisform.label1.left=x-thisform.label1.width/2thisform.label1.top=y+thisform.shape1.height/2-;thisform.label1.height/2,计算示意图,（6）Form1的RightClick事件代码编写如下：,thisform.release表单运行后屏幕显示如下，按鼠标右键推出,7.2输入类控件,7.2.1文本框文本框供用户输入或编辑数据一、文本框的值Value属性值为文本框的值，并显示修改方法：（1）属性窗口修改Value属性（2）代码命令:THIS.Value=VFP或thisform.text1.value=“VFPValue值类型：数值型0、字符型无、日期型、逻辑型.F.,默认类型,二、焦点,焦点（Focus）：用户操作指定的对象就是焦点所在。焦点标志：光标或虚线框焦点的变化：（1）TAB键（2）鼠标单击对象（3）代码Control.Setfocus如下方法程序：THISFORM.Text1.SetFocus与焦点有关的两个事件：获得焦点事件(GotFocusEvent)与失去焦点事件(LostFocusEvent),IMEMode属性值,0：无控件1：打开IMM2：关闭IMMIMEMode属性设置为1后，一旦该文本框控件获得焦点，就打开中文输入法窗口（多为微软拼音输入法）Visible(可见）属性值Enabled（可用）属性,要使控件能获得Focus,Enabled和Visible均应设定为.T.,三、控件与数据绑定,控件的数据绑定指将控件与某个数据源联系起来ControlSource属性：（1）字段：控件的值由字段决定（2）变量：控件的值由变量决定四、文本框生成器文本框生成器是用户设定属性的向导，其打开方式为单击文本框对象击右鼠标键“快捷”菜单“生成器”命令文本框生成器有三个选项卡,生成器只能用来设置控件的常规属性。并不是所有的控件都有生成器（见表1.4),1、格式选项卡,4种类型：数值，字符，日期和逻辑,只对字符型数据，等于Format属性设置为A,只对数值数据，相当于Format属性设置为L,只对字符型数据，等于Format属性设置为K,对应HideSelection属性（失去焦点时隐藏选定数据）,对应属性Enabled,ReadOnly属性,选定或设置输入掩码串，相当于属性InputMask,2、样式选项卡,SpecialEffects=3D,SpecialEffects=Plain,BolderStyle=1,BolderStyle=0,左对齐右对齐居中对齐自动,自动调整文本框大小使其恰好容纳数据,3、值选项卡,可利用该组合框的列表指定表或视图中的字段，被指定的字段将用来存储文本框的内容，相当于通过设置ControlSources属性来进行数据绑定,7.2.2编辑框,编辑框用于输入或更改文本，并准许输入多段文字。编辑框与文本框的区别：（1）编辑框只用来输入或编辑字符型数据，而文本框适用于四种数据类型（2）文本框只输入一段数据，而编辑框可以输入多段文字。P208例7-2（1）创建表单，并建立编辑框Edit1和文本框Text1（2）在数据环境添加SB表，将Edit1与备注字段SB.备注绑定（设置ControlSorce属性）,（3）Edit1的LostFocus事件代码this.hideselection=.f.,（4）Text1的GotFocus事件代码this.value=thisform.edit1.seltext（5）执行代码编辑框显示SB表的第一个记录的备注字段内容，选定一些文字后单击文本框，文本框内会显示所选文字注释（1）删除在Edit1中选定的文本THISFORM.Edit1.seltext=（2）将Edit1中所选的文本送剪贴板_CLIPTEXT=THISFORM.Edit1.seltext,7.2.3列表框与组合框,列表框与组合框都有一个供用户选择的列表，区别在于：（1）列表框任何时候都显示它的列表，而组合框平时只显示一个项（2）组合框又可分为下拉组合框（准许输入数据项）与下拉列表框；而列表框仅有选项功能。一、列表框生成器其含有四个选项卡，打开方法：创建一个列表框，单击之，快捷菜单“生成器”命令,1、“列表项”选项卡（1）表或视图中的字段,三种类型数据,数据库选择组合框,该种数据类型相当于：RowSourceType:6-字段（数据源类型）；RowSource:逗号分隔的字段（指定列表项的数据源）,列表框的每一项：按所选字段的次序显示字段值；返回值：所选项中第一列字段值,能将字段值填充到列表框,（2）手工输入数据,准许在设计时键如数据，并填充到列表框,表格供用户在单元键入数据,一行为一选项，列宽可调整,该种数据类型相当于：RowSourceType:1-值（数据源类型）；RowSource:逗号分隔的数据（指定列表项的数据源）,调整列数，相当于设置属性ColumnCount,（3）数组中的值,准许将熟组内容或某一部分填充到列表框,指定数组的名称，数组须由程序代码建立,当选定“某一范围的数组”时，用此调整列和行范围,当选定“某一范围的数组”时，用此调整列和行范围,相当于：RowSourceType:5-数组（数据源类型）；RowSource:数组名a（指定列表项的数据源）;FirstElement:1;NumberOfElement:=ALEN(a);ColumnCount:=Alen(a,2),P211例7-3,（1）在表单建立一个列表框和一个文本框控件（2）在列表框生成器选定“表或视图中的字段”选项选择SB表将“编号”和“名称”字段添入字段列表“确定”按钮（3）List1的InteractiveChange事件代码THISFORM.Text1.Value=THIS.ValueInteractiveChange事件在用户按键盘或鼠标键时被触发,（4）表单执行结果,单击某选项，该行第1列值（编号）即显示在文本框,DOFORME7-3,2、“样式”选项卡,行数调整,样式选择,3、“布局”选项卡,选定则能根据“列表项”选项卡指定的列数自动调整列表框的宽度（Width属性）,可用鼠标拖动标头右边的列间隔线来调整列宽（修改ColumnWidths属性）；双击列标头可选择是否隐藏该列显示,4、“值”选项卡,决定返回值的字段或列（属性BoundColumn）,指定存储返回值的字段（属性ControlSource）,二、控件值源的类型,列表框可以填充9种类型数据（前面涉及3种），具体由RowSourceType属性指定。见P212表7-5,三、组合框,组合框供用户在其列表中选项，或人工键入一个值组合框的Style属性将该控件分为两种类型，见P213表7-6P213例7-4（1）在表单上创建两个标签，1个列表框和1个组合框（2）在数据环境添加SB表和BMDM表（若有联结则删除）（3）属性设置，见P213表7-7（4）Combo1的InteractiveChange事件代码THISFORM.LIST1.Refresh（5）Form1的Init事件代码THISFORM.Combo1.Enabled=.F.,组合框生成器与列表框生成器类似,先加入SB,（6）List1的InteractiveChange事件代码THISFORM.Combo1.Enabled=.T.,（7）List1的Init事件代码SETORDERTOTAG编号（8）表单执行,先点击列表框某选项确定所需要的记录，然后打开组合框列表，从中选一项代替SB中的部门字段值,若无索引标识，则用命令indexon编号tag编号,四、属性与方法程序选介,1、ListCount属性返回组合框或列表框中列表项的个数。运行时只读Control.ListCount2、ListIndex属性返回或设置组合框（列表框）列表显示时选定的顺序号，运行时只读写Control.ListIndex=nIndex,要设置的顺序号，取值范围1-ListCount之间，缺省0,本属性用顺序号表示某项已经选定，对于下拉组合框，当列表中没有与键入值相同的项时就返回0,3、Selected属性,用于分辨组合框或列表框中某一列表项是否被选中，当选中时Selected属性返回.T.，否则返回.F.Form.Control.Selected(nIndex)=1Expr,列表项的显示顺序号,可取.T.或.F.，用来设置属性值,本属性设计时不可用，运行时可读写,4、AddItem方法程序,当组合框或列表框的RowSourceType属性为0时，使用本方法程序可在其列表中添加一个新项Control.AddItem(cItem,nIndex,nColumn),新项的字符表达式,新项的位置,放置新项的列，确省为1,若nIndex缺省，当Sorted属性为.T.时新项将按字母顺序插入列表，否则添加到表末尾,参见P212表7.5,P216例7-5,（1）在表单上建立一个列表框和一个标签（2）Label1属性设置AutoSize:.T.（3）List1属性设置RowSourceType:0MoverBars:.T.（4）List1的Click事件代码FORi=1TOTHIS.ListCountIFTHIS.Selected(i)=.T.THISFORM.Label1.Caption=STR(I,1)+SPACE(1)+THIS.ValueENDIFENDFOR,（5）List1的Init事件代码,THIS.Additem(音乐)THIS.Additem(上网)THIS.Additem(文学)THIS.Additem(摄像)THIS.Picture(1)=c:ProgramFilesMicrosoftVisual;StudioVfp98GALLERYGRAPHICSMUSIC.ICOTHIS.Picture(2)=c:ProgramFilesMicrosoftVisual;StudioVfp98GALLERYGRAPHICSINTERNET.ICOTHIS.Picture(3)=c:ProgramFilesMicrosoftVisual;StudioVfp98GALLERYGRAPHICSCLASSLIB.ICOTHIS.Picture(4)=c:ProgramFilesMicrosoftVisual;StudioVfp98GALLERYGRAPHICSVIDEO.ICOTHIS.Listindex=1,（5）表单运行,表单运行后，单击第三项,5、Value与DisplayValue属性,Value属性返回在列表中选定的项，DisplayValue属性则返回组合框中键入的文本P217例7-6（1）在表单创建一个组合框和一个文本框（2）Combo1属性设置Style:0RowSourceType:6RowSource:SB.编号,（3）Combo1的KeyPress事件代码,LPARAMETERSnKeyCode,nShiftAltCtrlIFnKeyCode=13IFTHIS.ListIndex=0THIS.RowSourceType=0THIS.AddItem(THIS.DisplayValue)THIS.Value=THIS.DisplayValueINSERTINTOSB(编号);VALUES(THIS.DisplayValue)THIS.RowSourceType=6ENDIFENDIF,（4）Combo1的InteractiveChange事件代码THISFORM.Text1.Value=THIS.Value,（5）运行用户键入数据并回车，程序用ListIndex属性判别组合框列表中是否已包含与键入值相同的项。若没有，则用AddItem将其添加到列表末尾，并用INSERT-SQL命令将它存入SB表新记录的编号字段。,6、List属性,返回组合框或列表框第行nRow，nCol列的内容Control.List(nRow,nCol)例如：为显示单列列表框的全部列表项，可为表单的Click事件编写如下代码FORi=1TTHISFORM.Combo1.ListCount?THISFORM.Combo1.List(i)ENDFOR,7.2.4微调按钮,微调按钮用于接受给定范围之内的数值输入。它即可用键盘输入，也可单击该控件的上箭头或下箭头来增减当前值。一、属性简介（1）Value：微调控件的当前值（2）KeyBoardHighValue：键盘输入的最高限值（3）KeyBoardLowValue：键盘输入的最低限值（4）SpinnerHighValue：按钮输入的最高限值（5）SpinnerLowValue：按钮输入的最低限值,（6）Increment：按一次按钮的增减数（默认为1）,（7）InputMask：设定输入掩码二、事件简介（1）DownClickEvent:微调控件的向下按钮事件（2）UpClickEvent：微调控件的向上按钮事件,7.3控制类控件,7.3.1命令按钮与命令按钮组一、命令按钮的控制作用命令按钮用于完成某一特定的操作，其操作代码通常放置在命令按钮的Click事件中P218例7-7（1）在表单上创建一个标签和一个文本框控件，命令按钮2个（2）属性设置见P219表7-8,（3）Form1的Load事件代码publicIi=0,（4）Command1的Click事件代码i=i+1IFTHISFORM.Text1.Value=123456THISFORM.ReleaseELSEIFI3MESSAGEBOX(密码错,请重新输入!)THISFORM.Text1.Value=THISFORM.Text1.SetFocusELSEMESSAGEBOX(密码错，禁止进入系统!)THISFORM.ReleaseENDIFENDIF,（5）Command2的Click事件代码THISFORM.Release,（6）运行结果界面,二、命令