文字滚动不闪烁例子

.如果真 (通用对话框1.打开 ())
标签2.标题 ＝ 到文本 (读入文件 (通用对话框1.文件名))
标签2.宽度 ＝ 取文本长度 (标签2.标题) × cd
标签2.左边 ＝ 画板2.宽度
.如果真结束
启动线程 (&_时钟2_周期事件, 13, 句柄)