超级编辑框文本颜色

qinhanfeng3321

这是2个超级编辑框      
我要做的是对比工具   我已经实现了   对比功能
现在要求就是   如果两边框里面有不一样的 文本    那么久把这个不一样的文本给上个颜色 即可

下面是我写的源码   对比写好了就是不会上颜色
.版本 2
.支持库 iext2
.支持库 spec
封包1 ＝ 超级编辑框1.内容
封包2 ＝ 超级编辑框2.内容
调试输出 (封包1)
a ＝ 分割文本 (封包1, “ ”, )
b ＝ 分割文本 (封包2, “ ”, )
' 调试输出 (a)
超级编辑框1.内容格式 ＝ 1
超级编辑框2.内容格式 ＝ 1
.如果 (取数组成员数 (a) ≠ 取数组成员数 (b))
    信息框 (“封包大小不一样”, 0, , )
.否则
    .计次循环首 (取数组成员数 (a), i)
        .如果 (a ＝ b )
        .否则
            编辑框1.加入文本 (a ＋ #换行符)
            编辑框2.加入文本 (b ＋ #换行符)
            超级编辑框1.起始选择位置 ＝ 超级编辑框1.寻找 (, , , a )
        .如果结束
    .计次循环尾 ()
.如果结束

漩涡鸣人

满意最佳

漩涡鸣人

  

子程序名	返回值类型	公开	备 注
指定文本颜色
参数名	类 型	参考	可空	数组	备 注
颜色值	整数型
欲设颜色文本	文本型

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

位 ＝ 超级编辑框1.寻找 (, , , 欲设颜色文本)
字符数 ＝ 取文本长 (欲设颜色文本)
判断循环首 (位 ＞ -1)
超级编辑框1.起始选择位置 ＝ 位
格式 ＝ 超级编辑框1.取选择区字符格式 ()
格式.文本颜色 ＝ 颜色值
超级编辑框1.被选择字符数 ＝ 字符数
超级编辑框1.置选择区字符格式 (格式)
位 ＝ 超级编辑框1.寻找 (位 ＋ 1, , , 欲设颜色文本)
判断循环尾 ()

子程序名	返回值类型	公开	备 注
取文本长	整数型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
i	整数型
长度	整数型

i ＝ 1
判断循环首 (i ＜ 取文本长度 (文本))
判断 (取代码 (文本, i) ＜ 0)
i ＝ i ＋ 2
i ＝ i ＋ 1
长度 ＝ 长度 ＋ 1
判断循环尾 ()
返回 (长度)

.版本 2<br /> <br /> .子程序 指定文本颜色<br /> .参数 颜色值, 整数型<br /> .参数 欲设颜色文本, 文本型<br /> .局部变量 格式, 字符格式<br /> .局部变量 位, 整数型<br /> .局部变量 字符数, 整数型<br /> <br /> 位 ＝ 超级编辑框1.寻找 (, , , 欲设颜色文本)<br /> 字符数 ＝ 取文本长 (欲设颜色文本)<br /> .判断循环首 (位 ＞ -1)<br />     超级编辑框1.起始选择位置 ＝ 位<br />     格式 ＝ 超级编辑框1.取选择区字符格式 ()<br />     格式.文本颜色 ＝ 颜色值<br />     超级编辑框1.被选择字符数 ＝ 字符数<br />     超级编辑框1.置选择区字符格式 (格式)<br />     位 ＝ 超级编辑框1.寻找 (位 ＋ 1, , , 欲设颜色文本)<br /> .判断循环尾 ()<br /> <br /> .子程序 取文本长, 整数型<br /> .参数 文本, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 长度, 整数型<br /> <br /> i ＝ 1<br /> .判断循环首 (i ＜ 取文本长度 (文本))<br />     .判断开始 (取代码 (文本, i) ＜ 0)<br />         i ＝ i ＋ 2<br />     .默认<br />         i ＝ i ＋ 1<br />     .判断结束<br />     长度 ＝ 长度 ＋ 1<br /> .判断循环尾 ()<br /> 返回 (长度)

补充内容 (2016-8-11 22:48):
调用指定文本颜色这个子程序就ok了，我写个列子给你，等下。

qinhanfeng3321

尛猪 发表于 2016-8-11 22:48
[e=1].版本 2

.子程序 指定文本颜色

恩  等着下载你的例子