第8章 面向对象程序与表单.ppt

  1. 1、本文档共80页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第8章 面向对象程序与表单

计时器(Timer)控件 1.功能: 由系统时钟控制,用于处理需要定时处理的事件。 2.常用属性 Enabled:确定计时器的工作状态. .T.时,计时器工作; .F.时,计时器挂起。 Interval:指定计时器控制的Timer事件之间的时间间隔的毫秒数。 3.常用事件 Timer事件:当经过Interval属性中指定的毫秒数时,此事件发生。 r=r+8 if r100 thisform.cls r=2 endif thisform.forecolor=mod(rand()*1234,12345) thisform.drawwidth=2 thisform.circle(r,120,100) if erval=0 mand1.caption=暂停 erval=100 else mand1.caption=工作 erval=0 Endif 表格(Grid)控件 1.功能: 用于浏览或编辑多行多列数据。 2.常用属性 RecordSourceType:指明表格数据源的类型. RecordSource:指定数据来源,它们取值及含义如表所示。? RecordSourceType属性值 RecordSource属性 0-表:数据来源由RecordSource属性指定的表,该表能被自动打开 表名 1-别名 数据来源于己打开的表 表的别名 2-提示 运行时,由用户根据提示选择表格数据源 3-查询 数据来源于查询 查询文件名 4-SQL语句 数据来源于SQL语句 SQL语句 表格属性 属性 说明 ColumnCount 表格的列数 RecordsourceType 数据源类型 Recordsource 表格的数据源 Readonly .T. ,只读 Linkmaster 表格控件中所显示的子表 的父表名称 Childorder 为建立一对多的关联关 系,子表所要用到的索引 RelationalExpr 确定基于主表字段的关联 表达式 3.常用的列属性 ControlSource:指定在列中显示的数据源. CurrentControl:指定列对象中显示和接收数据的控件 . Sparse:用于确定CurrentControl属性影响列中的所有单元格还是只影响活动单元格 . 注意: 设计时要设置列对象的属性,首先得选择列对象, 选择列对象有两种方法: ①从属性窗口的对象列表中选择相应列, ②右击表格,在弹出的快捷菜单中选择【编辑】命令,这时表格进入编辑状态(表格的周围有一个粗框),用户可用鼠标单击选择列对象。 4.常用的标头(Header)属性 Caption:指定标头对象的标题文本,显示于列顶部 。默认为对应字段的字段名。 Alignment:指定标题文本在对象中显示的对齐方式。 页框控件(pageframe) 页框是包含页面(page)的容器,用户可在页框中定义多个页面,以生成带选项卡的对话框 在页面中允许创建控件。若要向页面添加控件,须先将页框作为容器激活,然后选定此页面添加控件。 常见属性: Pagecount:指定页框中包含的页面数。 Caption:指定页面的标题,即选项卡的标题。 应用实例1: 本例使用“SwFlash.ocx” ActiveX控件制作一个flash动画播放器。 表单集(Formset) 容器类对象,其中可以包含有多个独立的表单。 制作进度条 应用实例3: if gress1.value+10=gress1.max gress1.value=gress1.value+10 endif thisform.label1.caption=目前进度为+alltrim(str(gress1.value))+% if gress1.value=gress1.max mand1.caption=开始 else mand1.caption=继续 endif if gress1.value=gress1.max gress1.value=gress1.min mand1.caption=开始 else mand1.caption=继续 erval=400 endif 利用形状控件制作指针式时钟 应用实例4: public top1,left1 public a(3) public c(3) public t(3) a(1)=this.secline a(2)=th

文档评论(0)

dajuhyy + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档