来帮忙看看超级编辑框的写法

q456

有没有什么办法直接一键复制内容到超级编辑框还要颜色，我原先写的是一个一个加入到超级编辑框里的这样太慢了，所以有没有什么办法直接一键复制到超级编辑框还有颜色一起

帅气与大侠

用这个版本，修复了光标位置错乱问题

  

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

超级编辑框高亮 (超级编辑框1)

子程序名	返回值类型	公开	备 注
超级编辑框高亮
参数名	类 型	参考	可空	数组	备 注
超级编辑框	超级编辑框

变量名	类 型	静态	数组	备 注
i	整数型
字符格式	字符格式
内容	文本型
光标位置	整数型

光标位置 ＝ 超级编辑框.起始选择位置
超级编辑框.禁止重画 ()
超级编辑框.可视 ＝ 假
计次循环首 (超级编辑框.取文本长度 (), i)
超级编辑框.起始选择位置 ＝ i － 1
超级编辑框.被选择字符数 ＝ 1
内容 ＝ 超级编辑框.被选择文本
' 快速高亮文本，需要变色的内容自己这边添加
判断 (内容 ＝ “5”)
字符格式.文本颜色 ＝ #蓝色
判断 (内容 ＝ “4”)
字符格式.文本颜色 ＝ #红色
判断 (内容 ＝ “6”)
字符格式.文本颜色 ＝ #橙黄
判断 (内容 ＝ “3”)
字符格式.文本颜色 ＝ #紫色


字符格式.文本颜色 ＝ #黑色

超级编辑框.置选择区字符格式 (字符格式)
计次循环尾 ()
超级编辑框.允许重画 ()
超级编辑框.可视 ＝ 真
超级编辑框.起始选择位置 ＝ 光标位置
超级编辑框.被选择字符数 ＝ 0
超级编辑框.获取焦点 ()

子程序名	返回值类型	公开	备 注
_超级编辑框1_内容被改变

超级编辑框高亮 (超级编辑框1)

i支持库列表	支持库注释
iext2	扩展界面支持库二

.版本 2<br /> .支持库 iext2<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 超级编辑框高亮 (超级编辑框1)<br /> <br /> .子程序 超级编辑框高亮<br /> .参数 超级编辑框, 超级编辑框<br /> .局部变量 i, 整数型<br /> .局部变量 字符格式, 字符格式<br /> .局部变量 内容, 文本型<br /> .局部变量 光标位置, 整数型<br /> <br /> 光标位置 ＝ 超级编辑框.起始选择位置<br /> <br /> 超级编辑框.禁止重画 ()<br /> 超级编辑框.可视 ＝ 假<br /> .计次循环首 (超级编辑框.取文本长度 (), i)<br />     超级编辑框.起始选择位置 ＝ i － 1<br />     超级编辑框.被选择字符数 ＝ 1<br />     内容 ＝ 超级编辑框.被选择文本<br />     ' 快速高亮文本，需要变色的内容自己这边添加<br />     .判断开始 (内容 ＝ “5”)<br />         字符格式.文本颜色 ＝ #蓝色<br />     .判断 (内容 ＝ “4”)<br />         字符格式.文本颜色 ＝ #红色<br />     .判断 (内容 ＝ “6”)<br />         字符格式.文本颜色 ＝ #橙黄<br />     .判断 (内容 ＝ “3”)<br />         字符格式.文本颜色 ＝ #紫色<br />     .默认<br /> <br />         字符格式.文本颜色 ＝ #黑色<br />     .判断结束<br /> <br /> <br /> <br />     超级编辑框.置选择区字符格式 (字符格式)<br /> .计次循环尾 ()<br /> 超级编辑框.允许重画 ()<br /> 超级编辑框.可视 ＝ 真<br /> 超级编辑框.起始选择位置 ＝ 光标位置<br /> 超级编辑框.被选择字符数 ＝ 0<br /> 超级编辑框.获取焦点 ()<br /> <br /> .子程序 _超级编辑框1_内容被改变<br /> <br /> 超级编辑框高亮 (超级编辑框1)

帅气与大侠

在编辑框内容被改变的事件里添加代码

  

子程序名	返回值类型	公开	备 注
超级编辑框高亮
参数名	类 型	参考	可空	数组	备 注
超级编辑框	超级编辑框

变量名	类 型	静态	数组	备 注
i	整数型
字符格式	字符格式
内容	文本型

超级编辑框.禁止重画 ()
超级编辑框.可视 ＝ 假
计次循环首 (超级编辑框.取文本长度 (), i)
超级编辑框.起始选择位置 ＝ i － 1
超级编辑框.被选择字符数 ＝ 1
内容 ＝ 超级编辑框.被选择文本
' 快速高亮文本，需要变色的内容自己这边添加
判断 (内容 ＝ “5”)
字符格式.文本颜色 ＝ #蓝色
判断 (内容 ＝ “4”)
字符格式.文本颜色 ＝ #红色
判断 (内容 ＝ “6”)
字符格式.文本颜色 ＝ #橙黄
判断 (内容 ＝ “3”)
字符格式.文本颜色 ＝ #紫色


字符格式.文本颜色 ＝ #黑色

超级编辑框.置选择区字符格式 (字符格式)
计次循环尾 ()
超级编辑框.允许重画 ()
超级编辑框.可视 ＝ 真
超级编辑框.获取焦点 ()

子程序名	返回值类型	公开	备 注
_超级编辑框1_内容被改变

超级编辑框高亮 (超级编辑框1)

i支持库列表	支持库注释
iext2	扩展界面支持库二

.版本 2<br /> .支持库 iext2<br /> <br /> .子程序 超级编辑框高亮<br /> .参数 超级编辑框, 超级编辑框<br /> .局部变量 i, 整数型<br /> .局部变量 字符格式, 字符格式<br /> .局部变量 内容, 文本型<br /> <br /> 超级编辑框.禁止重画 ()<br /> 超级编辑框.可视 ＝ 假<br /> .计次循环首 (超级编辑框.取文本长度 (), i)<br />     超级编辑框.起始选择位置 ＝ i － 1<br />     超级编辑框.被选择字符数 ＝ 1<br />     内容 ＝ 超级编辑框.被选择文本<br />     ' 快速高亮文本，需要变色的内容自己这边添加<br />     .判断开始 (内容 ＝ “5”)<br />         字符格式.文本颜色 ＝ #蓝色<br />     .判断 (内容 ＝ “4”)<br />         字符格式.文本颜色 ＝ #红色<br />     .判断 (内容 ＝ “6”)<br />         字符格式.文本颜色 ＝ #橙黄<br />     .判断 (内容 ＝ “3”)<br />         字符格式.文本颜色 ＝ #紫色<br />     .默认<br /> <br />         字符格式.文本颜色 ＝ #黑色<br />     .判断结束<br /> <br /> <br /> <br />     超级编辑框.置选择区字符格式 (字符格式)<br /> .计次循环尾 ()<br /> 超级编辑框.允许重画 ()<br /> 超级编辑框.可视 ＝ 真<br /> 超级编辑框.获取焦点 ()<br /> <br /> .子程序 _超级编辑框1_内容被改变<br /> <br /> 超级编辑框高亮 (超级编辑框1)