第7章 控件设计.ppt

* * 2．表格列（Column）的常用属性 ControlSource属性：指定要在列中显示的数据 CurrentControl：指定列对象显示活动单元值的控件 Sparse属性：指定 CurrentControl 属性是否仅影响列的活动单元。 还有DynamicBackColor、DynamicForeColor、 DynamicFontName、DynamicFontSize等属性，利用这些属性可以动态实现一些特殊的显示效果 例如，使用SetAll 方法把表格控件的背景色设置为红绿相间。 Form1.Grid1.SetAll(“DynamicBackColor”,；”IIF(mod(Recno(),2)=0,RGB(255,0,0),RGB(0,255,0))”, “Column”) 7.2 控件 3．表格标头（Header）的属性 Caption：指定标头对象的标题文本。 Alignment：指定标题文本的对齐方式。 例 创建一个表单，浏览读者的借阅信息。文本框中显示读者的编号和姓名，用表格显示该读者的借阅信息。 7.2 控件 7.2.10页框（PageFrame） 页框主要用于扩展表单的面积或功能。页框是包含多个页面的容器。页面还是容器控件，页面上可以含有其他控件，但页面不能直接拖放到表单上。 1．页框的常用属性 PageCount：页框中包含的页面数，Pages是页框的集合属性。 Tabs：决定页面的选项卡是否可见，默认值为.T. TabStyle：指定选项卡两端或非两端对齐，默认0-两端。 ActivePage：页框控件中活动页面的编号，默认值为1。 TabStretch：1为裁剪，0为堆积，将选项卡层叠起来。 2．页面的常用属性 Caption：指定页面的标签上显示的文本。 BackColor：指定页面的颜色。 例 ：创建一个表单，表单上有一个页框控件，页框的Tabs属性为.F.，试通过单击命令按钮组中的命令按钮激活各个页面。 在命令按钮组的Click事件中可以设置如下代码： n=This.Value IF n=4 Thisform.Release ELSE Thisform.PageFrame1.ActivePage=n ENDIF Thisform.Refresh 7.2 控件 例：创建一个表单，要求从组合框中选择读者的编号，在页框的第一页上显示读者的基本信息，第二页上显示该读者的借阅信息。 设置组合框的RowSourceType为3，RowSource为如下的SQL语句： SELECT dzbh FROM dz INTO CURSOR xx 组合框的InterActiveChange事件代码如下： PUBLIC bh1 bh1=This.Value IF USED(dz) SELECT dz ELSE USE dz ENDIF LOCATE FOR dzbh=bh1 Thisform.pf1.p1.Text1.Value=xm Thisform.pf1.p1.Text2.Value=csrq Thisform.pf1.p1.Check1.Value=gszt jsxs=lx IF jsxs=教师 Thisform.pf1.p1.Optiongroup1.Value=1 ELSE Thisform.pf1.p1.Optiongroup1.Value=2 ENDIF 7.2 控件 Thisform.pf1.p2.g1.RecordSourceType=4 Thisform.pf1.p2.g1.RecordSource=SELECT dzbh as 编号,sh as 书号,; jsrq as 借书日期,hsrq as 还书日期 ; FROM jy WHERE jy.dzbh=bh1 INTO CURSOR temp 7.2 控件 7.2.11计时器（Timer） 计时器是用来处理复发事件的控件。该控件设计时可见，运行时不可见。 1．常用属性 Interval：指定Timer事件发生的时间间隔，单位是毫秒。Interval为0时，计时器将不响应Timer事件。 Enabled：指定控件是否可用，属性设置为“真”（.T.）计时器启用。 2．常用事件 Timer：事件是计时器中最重要的事件。当经过Interval属性中设定的毫秒时间间隔后，此事件发生。 3．常用方法 调用Reset方法重置计时器控件，重新从零开始计时。 例：新建一表单，实现每隔一秒种，随机改变颜色。 设置计时器控件的Interval属性值为1000，Enabled属性为.F.。 在计时器的