查找和替换功能的源码分享，需要的拿走！

shuaier

支持开源~！感谢分享

JYYeah

感谢分享！

694336034

没错的话你这个出自一个高级记事本的源码里面借鉴来的，有个bug向上查找有偏移

哈拉哈拉

楼主试试用这两个搜索

  

子程序名	返回值类型	公开	备 注
搜索文本
参数名	类 型	参考	可空	数组	备 注
搜索的文本	文本型

超级编辑框1.起始选择位置 ＝ 超级编辑框1.寻找 (, , , 搜索的文本)
超级编辑框1.被选择字符数 ＝ 取字符数 (搜索的文本)
超级编辑框1.被选择字符数 ＝ 取字符数 (搜索的文本)
超级编辑框1.获取焦点 ()

子程序名	返回值类型	公开	备 注
向下搜索文本
参数名	类 型	参考	可空	数组	备 注
搜索的内容	文本型
超级编辑框	超级编辑框

变量名	类 型	静态	数组	备 注
pp	整数型

pp ＝ 超级编辑框1.寻找 (超级编辑框1.起始选择位置 ＋ 1, , , 超级编辑框.内容)
如果 (pp ≠ -1)
超级编辑框1.起始选择位置 ＝ pp
超级编辑框.起始选择位置 ＝ 超级编辑框.取文本长度 ()
超级编辑框1.被选择字符数 ＝ 超级编辑框.起始选择位置



超级编辑框1.获取焦点 ()

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

.版本 2<br /> .支持库 iext2<br /> <br /> .子程序 搜索文本<br /> .参数 搜索的文本, 文本型<br /> <br /> 超级编辑框1.起始选择位置 ＝ 超级编辑框1.寻找 (, , , 搜索的文本)<br /> 超级编辑框1.被选择字符数 ＝ 取字符数 (搜索的文本)<br /> 超级编辑框1.被选择字符数 ＝ 取字符数 (搜索的文本)<br /> 超级编辑框1.获取焦点 ()<br /> <br /> <br /> .子程序 向下搜索文本<br /> .参数 搜索的内容, 文本型<br /> .参数 超级编辑框, 超级编辑框, 参考<br /> .局部变量 pp, 整数型<br /> <br /> pp ＝ 超级编辑框1.寻找 (超级编辑框1.起始选择位置 ＋ 1, , , 超级编辑框.内容)<br /> .如果 (pp ≠ -1)<br />     超级编辑框1.起始选择位置 ＝ pp<br />     超级编辑框.起始选择位置 ＝ 超级编辑框.取文本长度 ()<br />     超级编辑框1.被选择字符数 ＝ 超级编辑框.起始选择位置<br /> .否则<br /> <br /> .如果结束<br /> <br /> 超级编辑框1.获取焦点 ()

396384183

谢谢分享~

阿阿冬

不能从光标处查找下一个啊   比如查找一次后把光标又点回去  他不会重新查找  还是往下找

阿阿冬

要点两次才能替换啊

阿阿冬

还是有很多问题啊 跟系统自带的查找相比

shuaier

支持开源~！感谢分享

大师兄是反派

支持一下