二级VFP_06第六章表单设计与应用讲述.ppt

例如，在“档案表”中，可用通用型字段保存员工的照片，每一幅照片都是一幅BMP图像。当要在表单上显示通用型字段的数据时，就可以使用ActiveX绑定。 先往表单中添加一个ActiveX绑定控件，然后把ActiveX绑定控件的ControlSource属性设置为通用型字段。 ActiveX绑定控件的其它属性： ·Visible属性：决定对象是否可见。 ·AutoActivate属性：当OLE对象获得了焦点，决定在运行表单时是否允许用户双击该对象，打开或编辑该对象。 ·AutoVerbMenu属性：决定在运行表单时是否允许用户使用OLE的快捷菜单，打开或编辑OLE对象。 十一、 计时器控件(Timer) 用于创建一个以一定时间间隔执行代码的计时器。 计时器控件能按预设的时间间隔，周期性地触发事件，即系统能定期地执行相应的事件代码。在表单运行时，计时器是不可见控件。 计时器控件的主要属性和事件： ·Interval属性（计时周期）：用于指定连续两次计时器事件(Timer事件)之间间隔的毫秒数，间隔范围从0到2,147,483,647。 单位是毫秒，当Interval属性值为0时，系统不会触发Timer事件。 如果计时器有效，且设置了Interval属性，那么它将以Interval属性指定的时间，近似等间隔接收一个Timer事件，利用该事件可以完成后台操作。 即每隔一个时间周期，执行一次Timer事件。 ·Enabled属性：用于设置计时器是否工作，当该属性设置为“真”时，计时器开始工作，当该属性设置为“假”时，计时器被挂起。 该属性可以利用一个外部事件进行设置，比如用命令按钮的Click事件启动计时器工作。 ·Timer事件：计时器事件，是在时间间隔到时触发的事件，通过编写事件代码，完成某个操作。 在表单运行时，系统每隔指定的时间间隔，就自动触发一次计时器的Timer事件，执行事件中的代码。 举例：在表单界面上添加一个时钟。 在表单中添加一个标签，添加一个计时器，设置Enabled属性为“真”，将Interval属性设置为500(0.5秒)。 在Timer事件中输入如下代码： Currenttime=Time() *时间数据是一个字符串 Currenthour=Val(Currenttime) *截取冒号前的小时数 If Currenthour12 Timestr=str(Currenthour-12,2)+substr(Currenttime,3,6)+PM Else Timestr=str(Currenthour,2)+substr(Currenttime,3,6)+AM Endif ThisForm.label1.Caption= Timestr 从冒号开始取6位：HH:MM:SS 举例：在表单界面上添加秒表计时器。 Timer控件的enabled属性设置为.F.，interval属性设置为100，即100毫秒。 表单的init事件代码： public st *设置一个全局变量st。 开始按钮的单击事件代码： thisform.timer1.enabled = .t. st=0 停止按钮的单击事件代码： thisform.timer1.enabled=.f. Timer1控件的timer事件代码： st=st+1 记录timer事件的次数，以便于计时 THISFORM.TEXT1.VALUE = str(st/10,8,1) THISFORM.REFRESH 计时原理： Interval的值为100毫秒，即每过100毫秒发生一次Timer事件，统计timer事件的次数，就相当于计时，这个次数就是多少个百毫秒，除以10，即为秒数。 十二、线条、形状和图像控件 1、线条控件 线条(Line)控件用于显示一个水平、竖直或对角线形的线条。 主要的属性：Width、Height，可以构成一个矩形，而线条则为这个矩形的对角线。 当Width为0时，画出一个垂直的线条； 当Height为0时，画出一个水平的线条。 拖动鼠标绘制线条时，要注意水平和垂直线条的画法。 Height Width ·BorderStyle属性：用于设置线条类型，该属性共有七种选择，分别是：0(透明)、1(实线、默认值)、2(虚线)、3(点线)、4(点划线)、5(双点划线)、6(内实线)。 ·BorderWidth属性：用于设置线条宽度（线条粗细）为多少个像素点。 ·LineSlant属性：用于设置当线条不为水平或垂直时，设置线条的走向，其值为“\”表示从左上角向右下角画线；“/”表示从右上角向左下角画线。 2、形状控