易语言编辑框内容滚动显示

.版本 2.支持库 spec
.子程序 _按钮1_被单击.局部变量 i, 整数型
.判断循环首 (真)
.计次循环首 (20, )
编辑框1.内容 ＝ “ ” ＋ 编辑框1.内容
延迟 (200)
.计次循环尾 ()
.变量循环首 (20, 1, -1, i)
编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “ ”, “”, i, 1, 真)
延迟 (200)
.变量循环尾 ()

.判断循环尾 ()
这个方法是用循环做的，占用CPU高，下面再用时钟做一个，占用CPU低

.版本 2
.程序集 窗口程序集1
.程序集变量 i, 整数型
.程序集变量 k, 整数型

.子程序 _时钟1_周期事件
i ＝ i ＋ 1
编辑框1.内容 ＝ “ ” ＋ 编辑框1.内容
.如果真 (i ＞ 20)
时钟1.时钟周期 ＝ 0
i ＝ 0
时钟2.时钟周期 ＝ 500
k ＝ 20
.如果真结束

.子程序 _时钟2_周期事件
.局部变量 x, 整数型

k ＝ k － 1
编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “ ”, “”, k, 1, 真)
.如果真 (k ＝ -1)
时钟1.时钟周期 ＝ 500
时钟2.时钟周期 ＝ 0
.如果真结束

.子程序 __启动窗口_创建完毕
k ＝ 20
具体循环次数可以根据你的编辑框宽度慢慢调试，这两个方法是两个笨方法不完美 !

这种滚动字幕一般我不会用编辑框做的，我都是用动画框来做的，在动画框内添加动画物体，物体文本写上你想显示的文本，然后将物体向一个方向移动，这样就完成了滚动显示

你是想达到文字运动的效果吧，可以使用“时钟”改变组件的位置，不懂继续追问

1