• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.5
软件大小:62.5M
更新时间:9-25

按键精灵iOS版
立即下载

软件版本:1.3.5
软件大小:29.2M
更新时间:06-14

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[源码分享] findstr在竖屏状态下,水平找字。效率高。 [复制链接]

1#
好看好用的函数,欢迎拿走。

  1. //参数x, y, x1, y1, str, color, sim,与按键类似
  2. //wordW 字的宽度,去字库中最宽的宽度即可
  3. //wordH 字的高度,取字库中最高的高度即可

  4. Function recursionFindWord(x, y, x1, y1, str, color, sim, wordW, wordH)
  5.     Dim intX,intY
  6.     Dim intX1,intY1
  7.     If y > y1 Then
  8.         recursionFindWord = "-1|-1"
  9.         Exit Function
  10.     End If
  11.     FindStr x, y, x1, y1, Left(str, 1), color, sim, intX, intY
  12.     If intX = -1 and intY = -1 Then
  13.         recursionFindWord = "-1|-1"
  14.         Exit Function
  15.     End If
  16.     FindStr intX, intY, intX + (wordW*len(str)), intY + wordH, Mid(str, 2, Len(str)), color, sim, intX1, intY1    
  17.     If intX1 > -1 and intY1 > -1 Then
  18.         recursionFindWord = intX & "|" & intY
  19.     Else
  20.         recursionFindWord = recursionFindWord(intX, intY+wordH, x1, y1, str, color, sim, wordW, wordH)
  21.     End If
  22. End Function
复制代码

最后编辑walkergogogo 最后编辑于 2017-11-29 15:06:31
---------------------5年多的编程经验,专业定制pc、安卓、模拟器脚本。
-
---------------------经济实惠有偿解决按键精灵基础问题。
-
---------------------联系QQ:3277595608
2#

抢个沙发坐坐

3#

谢谢分享了啊!!!!!!!

4#

好好的计算机好好的计算机

5#

看看是啥脚本

6#

打上文字不会被删除

7#

感谢分享







Yeah分享

8#

感谢分享,大爱无疆

9#

哈哈哈哈

10#

谢谢分享

11#

立冬吃什么

12#

谢谢~~~~~~~~~~~~~~~~~~~~~~~~~~~~

13#

谢谢分享了啊!!!!!

14#

和自己对话,哈哈哈哈哈哈

---------------------5年多的编程经验,专业定制pc、安卓、模拟器脚本。
-
---------------------经济实惠有偿解决按键精灵基础问题。
-
---------------------联系QQ:3277595608
15#

学习学习 111

16#

发的噶的舒服个娃情人分为

17#

666 谢谢老铁

18#

str在竖屏状态下,水平找字。效率高。

19#

小手一抖,谢谢分享

20#

想大神们学习

我是一个小学生
发新话题 回复该主题