如何在窗口加入滚动字幕

qingyun1018 2003-01-16 08:58:17
请教诸位,如何在窗口加入滚动字幕
...全文
108 12 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
klbt 2003-06-10
  • 打赏
  • 举报
回复
还要考虑循环,滚动字幕出了窗口怎么办?
要做相应的处理。
zapjenny 2003-06-10
  • 打赏
  • 举报
回复
http://www.pbhome.net/code_info.asp?codetype=1&codeid=7
这个,我测试,可用,你看看,
blackcorbie 2003-06-10
  • 打赏
  • 举报
回复
在timer事件里面:

li_space++
this.title =space(li_space)+ '七月彩虹畅满天!'

if li_space > 50 then li_space = 0
li_space++
this.title =space(li_space)+ '七月彩虹畅满天!'

然后在open事件里面:

Timer(0.5)
this.triggerevent(timer!)

试试看!
lidengke 2003-06-10
  • 打赏
  • 举报
回复
http://pbhome.net/code_info.asp?codetype=1&codeid=7
类似电影字幕滚动的程序
rogery 2003-06-10
  • 打赏
  • 举报
回复
//this.title=mid(this.title,3,len(this.title)-2)+left(this.title,2)
//if i=1 then
// this.title=''
// i=0
//else
// this.title='你所要显示的内容'
// i=1
//end if
注意:
结合TIME()事件
  • 打赏
  • 举报
回复
这个很easy的方法:
在timer中写
st_1.text=mid(st_1.text,3,len(st_1.text)-2)+left(st_1.text,2)
在open中写
timer(1)
如:st_1.text ="如何在窗口加入滚动字幕"]

这样用一下绝对好用,
dotnba 2003-06-09
  • 打赏
  • 举报
回复
同意TIMER
fulongbiao 2003-06-09
  • 打赏
  • 举报
回复
学习........
cjc79 2003-06-09
  • 打赏
  • 举报
回复
同意楼上的,控制字体的坐标就可以实现动态效果了。。
xingjiaren 2003-06-09
  • 打赏
  • 举报
回复
转帖
窗口open event:
timer(0.1)

窗口timer event:
比如用一个st_1作为滚动字幕

if st_1.x > -st_1.width then
st_1.x=st_1.x - 25
else
st_1.x=this.width
end if

YewPu 2003-01-16
  • 打赏
  • 举报
回复
很容易!
qingyun1018 2003-01-16
  • 打赏
  • 举报
回复
为什么回答呀,太难了吗?还是不屑回答。

1,108

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧