![]() ![]() |
||
VFP中状态栏控件的使用说明 | ||
作者:佚名 文章来源:不详 点击数 更新时间:2008/4/18 14:51:20 文章录入:杜斌 责任编辑:杜斌 | ||
|
||
当然不仅仅因为此,我们就要放弃该状态栏啊,有时我们需要使我们的状态栏显得更专业点,或者需要显示特定的状态栏信息,故,需要使用状态栏控件来使我们的程序更漂亮! 状态栏在显示时有两种模式,一是单版面,二是多版面。单版面就是在状态栏地方显示一个信息区,而且只可以放置简单的文字说明,而多版面可以放置二个或以上的信息区,并可以特定的系统说明,如CAPS,NUM,INS等的状态指示,并可以放置图片。而且两种模式在切换时还不互相干扰,互不影响! 下面说明一下其使用方法 首先该控件需要文件 mscomctl.ocx 的支持,如果在安装了VFP6的环境下,系统目录下已经有了该文件,如果在修改或运行前提示要打开一个OCX文件,那么需要首先拷贝该文件到你的系统目录,然后再指定该文件,因为第一次指定时,系统即注册该文件,及其路径,所以不要随便在第一次去指定一个OCX文件,否则麻烦大了! 状态栏的属性之一STYLE,即上面所讲的两种显示模式,0 - Mutliple panels 和 1 - Single panel simple text 当为Single panel simple text 模式时,很方便的处理,只要指定状态的另一个属性 SimpleText即可,就象在操作VFP主窗口的状态栏时用 set message to 那么方便了,在这里就是thisform.OleStatus.SimpleText="新的字符串"即可。 而当在 Mutliple panels 时就不同了,其实我们需要这个控件也就是为了这个功能吧,不然用VFP主窗口的状态栏不就行了嘛?在多版面时,每一个版面作为一个对象来操作,即Panel,对之我摸索到如下的属性: 1、Index 是指Panel的索引号,该索引号是顺序排列且唯一指定每一个Panel的。 2、Text 是指在Panel上显示文本的,只有当其Style=0(文字)时才有效。 3、ToolTipText 是当鼠标移到该Panel上时显示的提示信息,要当控件的ShowTips=.T.时才有效。 4、Key 是用来唯一标志每一个Panel的值,该值要么不指定,即为空,要么就是要唯一指定。在做对Panel的删除时,需要指定Panel的Key值。 5、Width 是指Panel的宽度,宽度不可以小于0,否则出错。 6、Tag 用来存储额外数据的,一般没什么用。 7、Visible 默认为.T.即可见,可以通过修改该值来隐含Panel. 8、Enabled 默认为可用,可以通过修改该值来表示Panel的可用不可用状态。 9、Alignment 对齐方式,默认为左对齐。 10、Style 表示Panel的样式,如普通文字,CAPS,NUM,INS的键的状态指示,用来表示日期,时间等。 11、Bevel 表示Panel的外观,有平面,突起,凹进三种。 12、Picture 该参数还未知如何以编程方式来指定,他的值是作为一个对象存储的。
方法: 1、添加 thisform.olestatus.panels.add(n,"key_"+allt(str(n)),"Ready",0 ) 以上代码参数表示: N 是指其INDEX值,该值必须唯一,且是顺序指定,"key_"+allt(str(n)) 表示其KEY值,要指定,必须使他唯一,否则出错。 "Ready" 是在PANEL上显示的文字。 后面的0表示其样式为普通文字。 2、删除 thisform.olestatus.panels.remove(key) 指定某一个PANEL的KEY值时,可以通过该命令来做删除。 3、更新 详细见示例中 应用: 1、显示进度条:
2、显示时钟 这个很简单,只要在表单上放一个时钟控件,设频率为1000微妙,TIMER事件里写 thisform.olestatus.panels.item(1).text = ttoc(datetime()) 表示在第一个PANEL里显示当前的时间,并每隔一秒更新,从而达到即时显示时间,但这个不是很有必要,毕竟他提供了时钟的功能,只是不显示秒? |
||
![]() ![]() |