怎样实现delphi7中statusbar组件文字可以滚动（从左到右或从右到左）
2个回答
展开全部
TTimer.Timer里写
statusbar1.Panels[0].Text := copy(statusbar1.Panels[0].Text,2,Length(statusbar1.Panels[0].Text)-1) + Copy(statusbar1.Panels[0].Text,1,1);
循环滚动，首尾相连，想隔开点的话，在text最后加点空格就好
如果是滚动汉字，并且IDE是DELPHI 7 ，注意要每次更改的字符位数。
什么？你说中英文混排？原理跟注意事项都提醒了，自己不能思考？
statusbar1.Panels[0].Text := copy(statusbar1.Panels[0].Text,2,Length(statusbar1.Panels[0].Text)-1) + Copy(statusbar1.Panels[0].Text,1,1);
循环滚动，首尾相连，想隔开点的话，在text最后加点空格就好
如果是滚动汉字，并且IDE是DELPHI 7 ，注意要每次更改的字符位数。
什么？你说中英文混排？原理跟注意事项都提醒了，自己不能思考？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
去找个 raize 组件包，各个delphi网站都有的，有源码的
或者用定时器，刷新文字就行了
或者用定时器，刷新文字就行了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
