祝愿大家身体健康!

 站点注册  找回密码
 站点注册

QQ登录

只需一步,快速开始

查看: 7849|回复: 2

[参考资料] pb数据窗口中闪烁文字显示的实现!

[复制链接]

[参考资料] pb数据窗口中闪烁文字显示的实现!

[复制链接]
ehxz

主题

0

回帖

58万

积分

管理员

积分
588671
贡献
在线时间
小时
2011-10-18 16:00:18 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?站点注册

×
数据窗口中闪烁文字显示的实现!步骤:

1、设置数据窗口对象的Timer Interval属性值为500,即500毫秒(相当于0.5秒)。

这个属性是数据窗口的刷新时间间隔属性,控制数据窗口的刷新频率。

2、选中数据窗口中要闪烁的列,选择其属性窗口的Font标签页,并选择该页中

Text Color字段后的按钮。在打开的表达式设置对话框中输入:

====================================================
if (mod(second(now()),2) <>0, rgb(255,0,0), rgb (255, 255,0))
====================================================

这一步完成的是列文字颜色的设置,根据列的数值和当前时间的秒数来设定。

利用上面的方法还可以实现数据窗口的自动刷新,比如:

在我们编写诸如像库存,销售等应用系统时,总希望程序能动态的自动刷新库存量或销售量,

比如说每隔1秒刷新一次。要实现这样的功能只要我们利用数据窗口的时间间隔属性(Timer Interval),当该值为0时数据窗口不进行刷新,如果要使数据窗口以每一秒钟的频率刷新的话,只要将该值设为1000,即1000毫秒。

  我们还可以为应用程序添加闪烁报警的功能。就拿库存量来说吧,最常用的是当某货物的库存量达到一个最低库存量时程序应能自动判别,并用警告色显示,通常是红色。此时,我们只要在运用了上述的方法后再在需要闪烁的字段上,比如,库存量,在它的颜色属性中写上相应的语句。下面这段代码实现“当某一物品的库存量小于20的时候,程序以红色闪烁显示警告”

if(Store_Num<20,if mod(Second(Now()),2)<>0,RGB(255,255,255),RGB(255,0,0))
// 每秒一次,偶数显示红色,奇数显示白色,即底色

共享共进共赢Sharing And Win-win Results
SYBASEBBS - 免责申明1、欢迎访问“SYBASEBBS.COM”,本文内容及相关资源来源于网络,版权归版权方所有!本站原创内容版权归本站所有,请勿转载!
2、本文内容仅代表作者观点,不代表本站立场,作者自负,本站资源仅供学习研究,请勿非法使用,否则后果自负!请下载后24小时内删除!
3、本文内容,包括但不限于源码、文字、图片等,仅供参考。本站不对其安全性,正确性等作出保证。但本站会尽量审核会员发表的内容。
4、如本帖侵犯到任何版权问题,请立即告知本站 ,本站将及时删除并致以最深的歉意!客服邮箱:admin@sybasebbs.com
a78782295

主题

0

回帖

163

积分

中级会员

积分
163
贡献
在线时间
小时
2012-3-22 18:09:34 | 显示全部楼层
MARK!!{:lh_05:}
共享共进共赢Sharing And Win-win Results
838637819

主题

0

回帖

337

积分

高级会员

积分
337
贡献
在线时间
小时
2012-12-29 13:20:06 | 显示全部楼层
学习了。,多谢。
共享共进共赢Sharing And Win-win Results
您需要登录后才可以回帖 登录 | 站点注册

本版积分规则

免责声明:
本站所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Admin@SybaseBbs.com

QQ|Archiver|PowerBuilder(PB)BBS社区 ( 鲁ICP备2021027222号-1 )

GMT+8, 2024-11-24 12:15 , Processed in 0.077599 second(s), 8 queries , MemCached On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表