怎么对比2个文本，取出其中文本2比文本1多出来的内容

风晓残阳

对比2个文本，取出文本2比文本1多出来的内容，求个demo

真冬

风晓残阳 发表于 2021-1-1 11:59
文本一：[a]123456789[a][a]123abc456[a][a]987654321[a][a]987654321[a]
文本二：[a]123456789[a][a]852 ...

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置易模块初始化代码

变量名	类 型	静态	数组	备 注
文本一	文本型
文本二	文本型

文本一 ＝ “[a]123456789[a][a]123abc456[a][a]987654321[a][a]987654321[a]”
文本二 ＝ “[a]123456789[a][a]852742[a][a]123abc456[a][a]987654321[a][a]987654321[a]”
信息框 (取出其中文本2比文本1多出来的内容 (文本一, 文本二, 2), 0, , )
返回 (0)

子程序名	返回值类型	公开	备 注
取出其中文本2比文本1多出来的内容	文本型
参数名	类 型	参考	可空	数组	备 注
文本一	文本型
文本二	文本型
至少比较文本长度	整数型

变量名	类 型	静态	数组	备 注
正则	正则表达式类
a	文本型
b	文本型

判断 (取文本长度 (文本一) ＞ 取文本长度 (文本二))
a ＝ 文本一 ＋ #换行符 ＋ 文本二
a ＝ 文本二 ＋ #换行符 ＋ 文本一
如果真 (至少比较文本长度 ＜ 1)
至少比较文本长度 ＝ 1
循环判断首 ()
正则.创建 (“(.{” ＋ 到文本 (至少比较文本长度) ＋ “,})(?=[^\r\n]*$[\r\n]+[^\r\n]*?(\1))”, a, 假, 真, 假, )
b ＝ a
a ＝ 正则.替换 (“”)
循环判断尾 (b ≠ a)
正则.创建 (“^.+?$”, a, 假, 真, 假, )
返回 (正则.取匹配文本 (1, ))

.版本 2<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码<br /> .局部变量 文本一, 文本型<br /> .局部变量 文本二, 文本型<br /> <br /> 文本一 ＝ “[a]123456789[a][a]123abc456[a][a]987654321[a][a]987654321[a]”<br /> 文本二 ＝ “[a]123456789[a][a]852742[a][a]123abc456[a][a]987654321[a][a]987654321[a]”<br /> 信息框 (取出其中文本2比文本1多出来的内容 (文本一, 文本二, 2), 0, , )<br /> 返回 (0)<br /> <br /> .子程序 取出其中文本2比文本1多出来的内容, 文本型<br /> .参数 文本一, 文本型<br /> .参数 文本二, 文本型<br /> .参数 至少比较文本长度, 整数型, 可空<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> <br /> .判断开始 (取文本长度 (文本一) ＞ 取文本长度 (文本二))<br />     a ＝ 文本一 ＋ #换行符 ＋ 文本二<br /> .默认<br />     a ＝ 文本二 ＋ #换行符 ＋ 文本一<br /> .判断结束<br /> .如果真 (至少比较文本长度 ＜ 1)<br />     至少比较文本长度 ＝ 1<br /> .如果真结束<br /> .循环判断首 ()<br />     正则.创建 (“(.{” ＋ 到文本 (至少比较文本长度) ＋ “,})(?=[^\r\n]*$[\r\n]+[^\r\n]*?(\1))”, a, 假, 真, 假, )<br />     b ＝ a<br />     a ＝ 正则.替换 (“”)<br /> .循环判断尾 (b ≠ a)<br /> 正则.创建 (“^.+?$”, a, 假, 真, 假, )<br /> 返回 (正则.取匹配文本 (1, ))

需要精易模块http://ec.125.la/

秀才遇到兵

一个最简单的方法
首先把 文本 1 逐字分割     然后用分割后的每一个字     把文本2  进行子文本替换，  剩下的就是 文本2 比文本1 多出来的内容

53770zhang

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
TXT	文本型
TXT2	文本型

TXT ＝ “aqa测试一下吧这个”
TXT2 ＝ “aadaqa测试一下吧这个发送到发送到”
调试输出 (子文本替换 (TXT2, TXT, “”, , , 真))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 TXT, 文本型<br /> .局部变量 TXT2, 文本型<br /> <br /> TXT ＝ “aqa测试一下吧这个”<br /> TXT2 ＝ “aadaqa测试一下吧这个发送到发送到”<br /> 调试输出 (子文本替换 (TXT2, TXT, “”, , , 真))

用子文本替换，把文本1替换成“”  空就行。

liuyun60

如果文本1在文本2中是个整体，那就直接子文本替换 (文本2, 文本1, “”, , , 真)，如果不是整体则逐字或逐行分割后比较，具体看你文本的形式

风晓残阳

liuyun60 发表于 2020-12-31 23:54
如果文本1在文本2中是个整体，那就直接子文本替换 (文本2, 文本1, “”, , , 真)，如果不是整体则逐字或逐 ...

不是整体，文本很乱，取出不同的

风晓残阳

53770zhang 发表于 2020-12-31 23:50
[e=0].版本 2
.支持库 spec

如果文本复杂一点，重复多一点，这个就不太好使了

53770zhang

风晓残阳 发表于 2021-1-1 00:09
如果文本复杂一点，重复多一点，这个就不太好使了

看具体情况，最难也不过把文本1逐字分割，然后全部替换。

liuyun60

风晓残阳 发表于 2021-1-1 00:08
不是整体，文本很乱，取出不同的

那就逐字分割在比较

liantan

是什么样的文本，对比删除掉相同的就是不同的。你发个文本看看。