无模块正则调试工具

易语言 2020-07-11 16:20:46

无模块正则调试工具

正在预处理现行程序
正在进行名称连接...
正在统计需要编译的子程序
正在编译...
正在生成主程序入口代码
程序代码编译成功
正在封装易格式目的代码
开始运行被调试程序

文本 = 完整完本
正则.创建 (正则规则, )
结果 = 正则.搜索全部 (文本)
子文本数量 = 正则.取子表达式个数 ()
应有子文本数量 = 取指定文本出现次数 (正则规则, #正则规则符号)
' 调试输出 (子文本数量, 应有子文本数量)
.计次循环首 (子文本数量, i)
超级列表框1.插入列 (i + 1, “子匹配文本[” + 到文本 (i) + “]”, 100, , , )
.计次循环尾 ()
.如果真 (取数组成员数 (结果) > 0)
.计次循环首 (取数组成员数 (结果), n1)
索引 = n1 - 1
超级列表框1.插入表项 (, , , , , )
.计次循环首 (子文本数量, i)
发布结果 = 结果 [n1].取子匹配文本 (文本, i, )
超级列表框1.置标题 (索引, 0, “匹配结果[” + 到文本 (n1) + “]”)
超级列表框1.置标题 (索引, 1, 正则规则)
超级列表框1.置标题 (索引, i + 1, 发布结果)
处理事件 ()
.如果真 (i = 子文本数量)
跳出循环 ()
.如果真结束

.计次循环尾 ()
处理事件 ()
.如果真 (n1 = 取数组成员数 (结果))
跳出循环 ()
.如果真结束

.计次循环尾 ()
.如果真结束
选择夹1.置子夹名称 (2, “匹配结果[” + 到文本 (取数组成员数 (结果)) + “]”)
标签生成结果.标题 = “匹配结果个数:” + 到文本 (取数组成员数 (结果)) + “,子匹配文本个数:” + 到文本 (子文本数量)
生成的易代码 = 生成易代码 (正则规则, 子文本数量)