收藏代码-快速文本-取出关键词所在行，做个笔记

sdlovets

  

子程序名	返回值类型	公开	备 注
文本所在行	整数型		未找到 返回-1
参数名	类 型	参考	可空	数组	备 注
原始文本	文本型
待找文本	文本型
所在整行	文本型

变量名	类 型	静态	数组	备 注
文本	快速文本对象
索引	整数型
游标	整数型
行数	整数型

文本.置文本 ( #换行符, 原始文本, #换行符 )
索引 ＝ 文本.寻找文本 (待找文本, , 真)
判断 (索引 ≠ -1)
索引 ＝ 文本.倒找文本 ( #换行符, 索引, 真)
循环判断首 ()
行数 ＝ 行数 ＋ 1
游标 ＝ 文本.寻找文本 ( #换行符, 游标 ＋ 1, 真)
循环判断尾 (游标 ≠ 索引)
所在整行 ＝ 文本.取文本 (索引 ＋ 2, 文本.寻找文本 ( #换行符, 索引 ＋ 2, 真) － 索引 － 2)
返回 (行数)
所在整行 ＝ “”
返回 (-1)

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> .支持库 commobj<br /> <br /> .子程序 文本所在行, 整数型, , 未找到 返回-1<br /> .参数 原始文本, 文本型<br /> .参数 待找文本, 文本型<br /> .参数 所在整行, 文本型, 参考 可空<br /> .局部变量 文本, 快速文本对象<br /> .局部变量 索引, 整数型<br /> .局部变量 游标, 整数型<br /> .局部变量 行数, 整数型<br /> <br /> 文本.置文本 (#换行符, 原始文本, #换行符)<br /> 索引 ＝ 文本.寻找文本 (待找文本, , 真)<br /> .判断开始 (索引 ≠ -1)<br />     索引 ＝ 文本.倒找文本 (#换行符, 索引, 真)<br />     .循环判断首 ()<br />         行数 ＝ 行数 ＋ 1<br />         游标 ＝ 文本.寻找文本 (#换行符, 游标 ＋ 1, 真)<br />     .循环判断尾 (游标 ≠ 索引)<br />     所在整行 ＝ 文本.取文本 (索引 ＋ 2, 文本.寻找文本 (#换行符, 索引 ＋ 2, 真) － 索引 － 2)<br />     返回 (行数)<br /> .默认<br />     所在整行 ＝ “”<br />     返回 (-1)<br /> .判断结束

shuya1

开源精神必须支持~

zidoo

文本.寻找文本    这些都是啥模块的？精益模块里面没有

8657

开源精神必须支持~

li110

已经顶贴，感谢您对论坛的支持！

KEY心碎

开源精神必须支持~

bianyuan456

已经顶贴，感谢您对论坛的支持！

shuya1

感谢分享，很给力！~

光影魔术

感谢分享

396384183

支持开源~！