【编程开发】AspAsp.NetCGIPHPJspXMLPERLC++C#VCVBDelphiPowerBuilderJAVA汇编数据库编程移动开发其它语言

您现在的位置:首页 > 网络学院 > 编程开发 > 数据库编程 > 利用PB5实现中英文信息滚动显示

利用PB5实现中英文信息滚动显示

来源: 作者: 日期:2006-08-14

【聚杰网数据库编程】利用PB5实现中英文信息滚动显示


利用PowerBuilder5.0编写数据库应用程序时,有时为了以生动活泼的形式给用户提供一些信息,采用提示信息循环显示的方法,如电视中插入一些临时信息一样滚动显示。利用PB5中的Timer事件可实现该功能。由于英文字符和中文汉字所占字节不同,在实现上稍有变化。

  实现中文信息滚动显示的方法如下:

  1、在窗口中定义单行编辑器(sle_1),宽度视需要而定,可以比欲显示的信息窄。

  2、定义实例变量(Instance Variables):

real interval_time = 0.3//控制信息滚动速度,数值越大,速度越慢int ticker = 1string showtext =“欢迎使用本系统!北京燕化集团化工二厂计算机站 开发1998年6月” 注:标点符号与数字都用全角字符。
  3、编写窗口的open事件脚本:
timer(interval_time)
  4、 编写窗口的timer事件脚本:
sle_1.text = mid(showtext,ticker + 2) + left(showtext,ticker)ticker = ticker + 2if ticker $#@62; len(showtext) then ticker = 1

  实现英文信息滚动的方法基本如上,只是实例变量showtext全部为单字节的英文字母,如“WELCOME TO EQUIPMENT MANAGEMENT”,在窗口的timer事件中写入如下脚本:

sle_1.text = mid(showtext,ticker + 1) + left(showtext,ticker)ticker = ticker + 1if ticker $#@62; len(showtext) then ticker = 1
  以上方法只能实现中文或英文信息的滚动,若想实现中英文混合信息的滚动,可采用中文信息滚动的方法,实例变量showtext中凡中文字符均位于奇数字节位即可,否则中文字符滚动至左边界时出现乱码。

  此方法用PowerBuilder5.0在本人586机器上,WIN98/95平台上实现,能够正确运行。



评论   点击查看全部评论
您的评论参与,将为聚杰带来更大的动力!请不要吝啬!
快速回复
请使用文明语言让我们维护健康绿色网络环境!

匿名发表   验证码: