超级编辑框如何把有颜色字体的那一整行删了。

iXie5

输入的是：
03-20系列。陈
36-20系列。陈
01-20系列。陈
08-20系列。陈阳写
46-20系列。蔬菜瓜果
05系列、基础
04-20日-。牛肉
33-21日。禽类
03-20-27


输出的结果是：
03-20系列。陈
46-20系列。蔬菜瓜果
03-20-27



相当于是把超级边框内红色字体的那一行整行删掉

山猫啊

删除红色行.e (958.26 KB, 下载次数: 3)

2025-8-24 22:44 上传

点击文件名下载附件

补充内容 (2025-8-24 23:01):
这个只能单字符的   含中文的在新帖子里面发了

by626

根据颜色判断是否删除？

iXie5

by626 发表于 2025-8-24 21:27
根据颜色判断是否删除？

是啊，每一行里面有出现红色的字体就删除

zainex

  

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

变量名	类 型	静态	数组	备 注
字符格式	字符格式
数	整数型
结果	文本型

计次循环首 (超级编辑框1.取文本长度 (), 数)
超级编辑框1.起始选择位置 ＝ 数 － 1
超级编辑框1.被选择字符数 ＝ 1
字符格式 ＝ 超级编辑框1.取选择区字符格式 ()
如果真 (字符格式.文本颜色 ≠ #红色 )
结果 ＝ 结果 ＋ 超级编辑框1.被选择文本

计次循环尾 ()
超级编辑框1.内容 ＝ 结果

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

.版本 2<br /> .支持库 iext2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 字符格式, 字符格式<br /> .局部变量 数, 整数型<br /> .局部变量 结果, 文本型<br /> <br /> .计次循环首 (超级编辑框1.取文本长度 (), 数)<br />     超级编辑框1.起始选择位置 ＝ 数 － 1<br />     超级编辑框1.被选择字符数 ＝ 1<br />     字符格式 ＝ 超级编辑框1.取选择区字符格式 ()<br />     .如果真 (字符格式.文本颜色 ≠ #红色)<br />         结果 ＝ 结果 ＋ 超级编辑框1.被选择文本<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 超级编辑框1.内容 ＝ 结果

效果:

iXie5

zainex 发表于 2025-8-24 21:56
[e=1].版本 2
.支持库 iext2

这个不是我想要的功能啊，

zainex

  

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

变量名	类 型	静态	数组	备 注
长度	整数型
字符格式	字符格式
数	整数型
结果	文本型
到行尾	逻辑型
下标	整数型

长度 ＝ 超级编辑框1.取文本长度 ()
计次循环首 (长度, 数)
超级编辑框1.起始选择位置 ＝ 数 － 1
超级编辑框1.被选择字符数 ＝ 1
字符格式 ＝ 超级编辑框1.取选择区字符格式 ()
如果真 (字符格式.文本颜色 ＝ #红色 )
到行尾 ＝ 真
如果真 (到行尾 ＝ 真 且 (超级编辑框1.被选择文本 ＝ #换行符 或 数 ＝ 长度))
到行尾 ＝ 假
下标 ＝ 倒找文本 (结果, #换行符, , 假)
如果 (下标 ＝ -1)
结果 ＝ “”
结果 ＝ 取文本左边 (结果, 下标 ＋ 1)
调试输出 (结果)
到循环尾 ()
结果 ＝ 结果 ＋ 超级编辑框1.被选择文本
计次循环尾 ()
超级编辑框1.内容 ＝ 结果

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

.版本 2<br /> .支持库 iext2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 长度, 整数型<br /> .局部变量 字符格式, 字符格式<br /> .局部变量 数, 整数型<br /> .局部变量 结果, 文本型<br /> .局部变量 到行尾, 逻辑型<br /> .局部变量 下标, 整数型<br /> <br /> 长度 ＝ 超级编辑框1.取文本长度 ()<br /> .计次循环首 (长度, 数)<br />     超级编辑框1.起始选择位置 ＝ 数 － 1<br />     超级编辑框1.被选择字符数 ＝ 1<br />     字符格式 ＝ 超级编辑框1.取选择区字符格式 ()<br />     .如果真 (字符格式.文本颜色 ＝ #红色)<br />         到行尾 ＝ 真<br />     .如果真结束<br />     .如果真 (到行尾 ＝ 真 且 (超级编辑框1.被选择文本 ＝ #换行符 或 数 ＝ 长度))<br />         到行尾 ＝ 假<br />         下标 ＝ 倒找文本 (结果, #换行符, , 假)<br />         .如果 (下标 ＝ -1)<br />             结果 ＝ “”<br />         .否则<br />             结果 ＝ 取文本左边 (结果, 下标 ＋ 1)<br />         .如果结束<br />         调试输出 (结果)<br />         到循环尾 ()<br />     .如果真结束<br />     结果 ＝ 结果 ＋ 超级编辑框1.被选择文本<br /> .计次循环尾 ()<br /> 超级编辑框1.内容 ＝ 结果

删除行:

zainex

如果不会用, 下载:
完整例子.zip (2.07 KB, 下载次数: 2)

2025-8-24 23:10 上传

点击文件名下载附件