想要个超级编辑框逐字输入效果

farst

真冬

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
确保执行完毕	逻辑型
计数行	整数型

' 想实现逐字输入的效果！
如果真 (确保执行完毕)
调试输出 (“逐字输入的效果未执行完毕，稍后再44944。”)
返回 ()

确保执行完毕 ＝ 真
计数行 ＝ 计数行 ＋ 1
插入指定颜色文本 (字符 (10))
插入指定颜色文本 (“这是第” ＋ 到文本 (计数行) ＋ “条”, 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255)), 111)
确保执行完毕 ＝ 假

子程序名	返回值类型	公开	备 注
插入指定颜色文本
参数名	类 型	参考	可空	数组	备 注
文本	文本型
颜色
逐字间隔时间_毫秒	整数型

变量名	类 型	静态	数组	备 注
格式	字符格式
段落	段落格式
i1	整数型

格式.字体名称 ＝ “阿里巴巴普惠体 Heavy”
格式.字体大小 ＝ 20
格式.效果 ＝ #下划线
格式.文本颜色 ＝ 颜色
超级编辑框1.起始选择位置 ＝ 0
超级编辑框1.置选择区字符格式 (格式)
段落.对齐方式 ＝ #段落居中
超级编辑框1.置选择区段落格式 (段落)
计次循环首 (取文本长度 (文本), )
i1 ＝ i1 ＋ 1
判断 (取代码 (文本, i1) ＜ 0)
超级编辑框1.被选择文本 ＝ 字符 (取代码 (文本, i1)) ＋ 字符 (取代码 (文本, i1 ＋ 1))
i1 ＝ i1 ＋ 1
超级编辑框1.被选择文本 ＝ 字符 (取代码 (文本, i1))
延时 (逐字间隔时间_毫秒)
处理事件 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库
iext2	扩展界面支持库二

.版本 2<br /> .支持库 spec<br /> .支持库 iext2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 确保执行完毕, 逻辑型, 静态<br /> .局部变量 计数行, 整数型, 静态<br /> <br /> <br /> ' 想实现逐字输入的效果！<br /> <br /> .如果真 (确保执行完毕)<br />     调试输出 (“逐字输入的效果未执行完毕，稍后再44944。”)<br />     返回 ()<br /> .如果真结束<br /> <br /> 确保执行完毕 ＝ 真<br /> 计数行 ＝ 计数行 ＋ 1<br /> 插入指定颜色文本 (字符 (10))<br /> 插入指定颜色文本 (“这是第” ＋ 到文本 (计数行) ＋ “条”, 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255)), 111)<br /> 确保执行完毕 ＝ 假<br /> <br /> .子程序 插入指定颜色文本<br /> .参数 文本, 文本型<br /> .参数 颜色, , 可空<br /> .参数 逐字间隔时间_毫秒, 整数型, 可空<br /> .局部变量 格式, 字符格式<br /> .局部变量 段落, 段落格式<br /> .局部变量 i1, 整数型<br /> <br /> <br /> 格式.字体名称 ＝ “阿里巴巴普惠体 Heavy”<br /> 格式.字体大小 ＝ 20<br /> 格式.效果 ＝ #下划线<br /> 格式.文本颜色 ＝ 颜色<br /> <br /> 超级编辑框1.起始选择位置 ＝ 0<br /> 超级编辑框1.置选择区字符格式 (格式)<br /> 段落.对齐方式 ＝ #段落居中<br /> 超级编辑框1.置选择区段落格式 (段落)<br /> .计次循环首 (取文本长度 (文本), )<br />     i1 ＝ i1 ＋ 1<br />     .判断开始 (取代码 (文本, i1) ＜ 0)<br />         超级编辑框1.被选择文本 ＝ 字符 (取代码 (文本, i1)) ＋ 字符 (取代码 (文本, i1 ＋ 1))<br />         i1 ＝ i1 ＋ 1<br />     .默认<br />         超级编辑框1.被选择文本 ＝ 字符 (取代码 (文本, i1))<br />     .判断结束<br />     延时 (逐字间隔时间_毫秒)<br />     处理事件 ()<br /> .计次循环尾 ()

鹏书

一个一个字往里面加

LEOONL

超级编辑框.e (1.08 MB, 下载次数: 11)

2024-9-25 12:53 上传

点击文件名下载附件