通用型的API控制外部窗口源码

youincun

好东西，谢谢，正需要！

sunmoonstar

看看怎么样

158125957

走过路过不错过

h252444544

来学习了,呵呵

go3962182

这个非常不错

邪意邪神

不错呢，学习一下咯.....

a2488031

不错呢，学习一下咯.....

Integer

Fiddler最新汉化版，有用到抓包工具的朋友可以来看看

jy5

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
程序集_计算器	整数型
程序集_计算器编辑框	整数型

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

皮肤加载 ()
运行 (“calc.exe”, 假, )
程序集_计算器 ＝ 取句柄_标题 (“计算器”)
程序集_计算器编辑框 ＝ 取子句柄_类名 (程序集_计算器, “Edit”)

子程序名	返回值类型	公开	备 注
取句柄_标题	整数型
参数名	类 型	参考	可空	数组	备 注
标题	文本型

返回 (寻找窗口_api (0, 0, 0, 标题))

子程序名	返回值类型	公开	备 注
取子句柄_类名	整数型
参数名	类 型	参考	可空	数组	备 注
父亲窗口句柄	整数型
子窗口标题	文本型

返回 (寻找窗口_api (父亲窗口句柄, 0, 子窗口标题, 0))

子程序名	返回值类型	公开	备 注
取组件句柄	整数型
参数名	类 型	参考	可空	数组	备 注
子窗口标题	文本型
父亲窗口句柄	整数型

变量名	类 型	静态	数组	备 注
目标句柄	整数型
窗口标题	文本型

循环判断首 ()
目标句柄 ＝ 寻找窗口_api (父亲窗口句柄, 目标句柄, 0, 0)
如果真 (取标题 (目标句柄) ＝ 子窗口标题)
跳出循环 ()

循环判断尾 (目标句柄 ≠ 0)
返回 (目标句柄)

子程序名	返回值类型	公开	备 注
寻找窗口_api	整数型
参数名	类 型	参考	可空	数组	备 注
hwnd
x1	通用型
x2	通用型
x3	通用型

返回 (winapi (, “FindWindowExA”, 1, hwnd, x1, x2, x3))

子程序名	返回值类型	公开	备 注
取标题	文本型
参数名	类 型	参考	可空	数组	备 注
目标句柄	整数型

变量名	类 型	静态	数组	备 注
窗口标题	文本型

窗口标题 ＝ 取空白文本 (255)
winapi (, “GetWindowTextA”, 1, 目标句柄, 窗口标题, 255)
返回 (窗口标题)

子程序名	返回值类型	公开	备 注
_按钮_加数_被单击

变量名	类 型	静态	数组	备 注
按钮_加数句柄	整数型

按钮_加数句柄 ＝ 取组件句柄 (“1”, 程序集_计算器)
模拟后台鼠标点击 (按钮_加数句柄)
编辑框1.内容 ＝ “1”

子程序名	返回值类型	公开	备 注
_按钮_加号_被单击

变量名	类 型	静态	数组	备 注
按钮_加号句柄	整数型

按钮_加号句柄 ＝ 取组件句柄 (“+”, 程序集_计算器)
模拟后台鼠标点击 (按钮_加号句柄)
编辑框1.内容 ＝ “+”

子程序名	返回值类型	公开	备 注
模拟后台鼠标点击
参数名	类 型	参考	可空	数组	备 注
组件句柄	整数型

发送通用消息_api (组件句柄, 245, 0, 0)

子程序名	返回值类型	公开	备 注
_按钮_被加数_被单击

变量名	类 型	静态	数组	备 注
按钮_被加数句柄	整数型

按钮_被加数句柄 ＝ 取组件句柄 (“2”, 程序集_计算器)
模拟后台鼠标点击 (按钮_被加数句柄)
编辑框1.内容 ＝ “2”

子程序名	返回值类型	公开	备 注
_按钮_等于_被单击

变量名	类 型	静态	数组	备 注
按钮_等于句柄	整数型
计算结果	文本型
本窗口编辑框	整数型

按钮_等于句柄 ＝ 取组件句柄 (“=”, 程序集_计算器)
模拟后台鼠标点击 (按钮_等于句柄)
编辑框1.内容 ＝ “ ”
全选 (程序集_计算器编辑框) ' 全选
复制 (程序集_计算器编辑框)
取消全选 (程序集_计算器编辑框)
粘贴 (编辑框1.取窗口句柄 ())

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

皮肤卸载 ()

子程序名	返回值类型	公开	备 注
全选
参数名	类 型	参考	可空	数组	备 注
hwnd

发送通用消息_api (hwnd, 177, 0, -1) ' 全选

子程序名	返回值类型	公开	备 注
复制
参数名	类 型	参考	可空	数组	备 注
hwnd

发送通用消息_api (hwnd, 769, 0, 0) ' 复制

子程序名	返回值类型	公开	备 注
粘贴
参数名	类 型	参考	可空	数组	备 注
hwnd

发送通用消息_api (hwnd, 770, 0, 0) ' 取消全选

子程序名	返回值类型	公开	备 注
取消全选
参数名	类 型	参考	可空	数组	备 注
hwnd

发送通用消息_api (hwnd, 177, 0, 0) ' 粘贴

子程序名	返回值类型	公开	备 注
置焦点
参数名	类 型	参考	可空	数组	备 注
HWND

发送通用消息_api (HWND, 7, 0, 0)

子程序名	返回值类型	公开	备 注
发送通用消息_api
参数名	类 型	参考	可空	数组	备 注
HWND
X1	通用型
X2	通用型
X3	通用型

winapi (, “SendMessageA”, 1, HWND, X1, X2, X3)

i支持库列表	支持库注释
JY	(未知支持库)

.版本 2<br /> .支持库 JY<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 程序集_计算器, 整数型<br /> .程序集变量 程序集_计算器编辑框, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 皮肤加载 ()<br /> <br /> 运行 (“calc.exe”, 假, )<br /> 程序集_计算器 ＝ 取句柄_标题 (“计算器”)<br /> 程序集_计算器编辑框 ＝ 取子句柄_类名 (程序集_计算器, “Edit”)<br /> <br /> <br /> .子程序 取句柄_标题, 整数型, 公开<br /> .参数 标题, 文本型<br /> <br /> 返回 (寻找窗口_api (0, 0, 0, 标题))<br /> <br /> <br /> .子程序 取子句柄_类名, 整数型, 公开<br /> .参数 父亲窗口句柄, 整数型<br /> .参数 子窗口标题, 文本型<br /> <br /> 返回 (寻找窗口_api (父亲窗口句柄, 0, 子窗口标题, 0))<br /> <br /> <br /> .子程序 取组件句柄, 整数型, 公开<br /> .参数 子窗口标题, 文本型<br /> .参数 父亲窗口句柄, 整数型<br /> .局部变量 目标句柄, 整数型<br /> .局部变量 窗口标题, 文本型<br /> <br /> <br /> <br /> .循环判断首 ()<br /> 目标句柄 ＝ 寻找窗口_api (父亲窗口句柄, 目标句柄, 0, 0)<br /> <br /> .如果真 (取标题 (目标句柄) ＝ 子窗口标题)<br /> 跳出循环 ()<br /> .如果真结束<br /> <br /> .循环判断尾 (目标句柄 ≠ 0)<br /> 返回 (目标句柄)<br /> <br /> <br /> .子程序 寻找窗口_api, 整数型, 公开<br /> .参数 hwnd<br /> .参数 x1, 通用型, 参考<br /> .参数 x2, 通用型, 参考<br /> .参数 x3, 通用型, 参考<br /> <br /> 返回 (winapi (, “FindWindowExA”, 1, hwnd, x1, x2, x3))<br /> <br /> .子程序 取标题, 文本型<br /> .参数 目标句柄, 整数型<br /> .局部变量 窗口标题, 文本型<br /> <br /> 窗口标题 ＝ 取空白文本 (255)<br /> winapi (, “GetWindowTextA”, 1, 目标句柄, 窗口标题, 255)<br /> 返回 (窗口标题)<br /> <br /> <br /> .子程序 _按钮_加数_被单击<br /> .局部变量 按钮_加数句柄, 整数型<br /> <br /> 按钮_加数句柄 ＝ 取组件句柄 (“1”, 程序集_计算器)<br /> 模拟后台鼠标点击 (按钮_加数句柄)<br /> 编辑框1.内容 ＝ “1”<br /> <br /> .子程序 _按钮_加号_被单击<br /> .局部变量 按钮_加号句柄, 整数型<br /> <br /> 按钮_加号句柄 ＝ 取组件句柄 (“+”, 程序集_计算器)<br /> 模拟后台鼠标点击 (按钮_加号句柄)<br /> 编辑框1.内容 ＝ “+”<br /> <br /> <br /> .子程序 模拟后台鼠标点击, , 公开<br /> .参数 组件句柄, 整数型<br /> <br /> 发送通用消息_api (组件句柄, 245, 0, 0)<br /> <br /> .子程序 _按钮_被加数_被单击<br /> .局部变量 按钮_被加数句柄, 整数型<br /> <br /> 按钮_被加数句柄 ＝ 取组件句柄 (“2”, 程序集_计算器)<br /> 模拟后台鼠标点击 (按钮_被加数句柄)<br /> 编辑框1.内容 ＝ “2”<br /> <br /> .子程序 _按钮_等于_被单击<br /> .局部变量 按钮_等于句柄, 整数型<br /> .局部变量 计算结果, 文本型<br /> .局部变量 本窗口编辑框, 整数型<br /> <br /> 按钮_等于句柄 ＝ 取组件句柄 (“=”, 程序集_计算器)<br /> 模拟后台鼠标点击 (按钮_等于句柄)<br /> 编辑框1.内容 ＝ “ ”<br /> 全选 (程序集_计算器编辑框) ' 全选<br /> 复制 (程序集_计算器编辑框)<br /> 取消全选 (程序集_计算器编辑框)<br /> 粘贴 (编辑框1.取窗口句柄 ())<br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> 皮肤卸载 ()<br /> <br /> <br /> .子程序 全选, , 公开<br /> .参数 hwnd<br /> <br /> 发送通用消息_api (hwnd, 177, 0, -1) ' 全选<br /> <br /> .子程序 复制, , 公开<br /> .参数 hwnd<br /> <br /> 发送通用消息_api (hwnd, 769, 0, 0) ' 复制<br /> <br /> .子程序 粘贴, , 公开<br /> .参数 hwnd<br /> <br /> 发送通用消息_api (hwnd, 770, 0, 0) ' 取消全选<br /> <br /> <br /> .子程序 取消全选, , 公开<br /> .参数 hwnd<br /> <br /> 发送通用消息_api (hwnd, 177, 0, 0) ' 粘贴<br /> <br /> .子程序 置焦点, , 公开<br /> .参数 HWND<br /> <br /> 发送通用消息_api (HWND, 7, 0, 0)<br /> <br /> .子程序 发送通用消息_api, , 公开<br /> .参数 HWND<br /> .参数 X1, 通用型, 参考<br /> .参数 X2, 通用型, 参考<br /> .参数 X3, 通用型, 参考<br /> <br /> winapi (, “SendMessageA”, 1, HWND, X1, X2, X3)

dongxicheng

不懂是什么，但还是下载来看看