易语言制作窗口信息探测工具的代码

DLL命令代码

.版本 2
.DLL命令 GetCursorPos, 逻辑型, "user32.dll", "GetCursorPos"
  .参数 光标位置, POINT, 传址
.DLL命令 WindowFromPoint, 整数型, "user32.dll", "WindowFromPoint"
  .参数 X轴光标, 整数型
  .参数 Y轴光标, 整数型
.DLL命令 SendMessage, 整数型, , "SendMessageA"
  .参数 hwnd, 整数型
  .参数 wMsg, 整数型
  .参数 wParam, 整数型
  .参数 lParam, 文本型, 传址, any
.DLL命令 GetClassName, 整数型, "user32.dll", "GetClassNameA"
  .参数 句柄, 整数型
  .参数 文本, 文本型
  .参数 文本长度, 整数型
.DLL命令 GetClassLong, 整数型, , "GetClassLongA"
  .参数 句柄, 整数型
  .参数 信息, 整数型
.DLL命令 GetWindowLong, 整数型, "user32.dll", "GetWindowLongA"
  .参数 句柄, 整数型
  .参数 信息, 整数型
.DLL命令 GetWindowRect, 整数型, "user32.dll", "GetWindowRect"
  .参数 句柄, 整数型
  .参数 大小, RECT, 传址

常量表

.版本 2
.常量 WM_GETTEXT, "13"

自定义数据类型

.版本 2
.数据类型 POINT
  .成员 x, 整数型, , , X轴坐标
  .成员 y, 整数型, , , Y轴坐标
.数据类型 RECT
  .成员 Left, 整数型
  .成员 Top, 整数型
  .成员 Right, 整数型
  .成员 Bottom, 整数型
.数据类型 MSG
  .成员 hwnd, 整数型
  .成员 message, 整数型
  .成员 wParam, 整数型
  .成员 lParam, 整数型
  .成员 time, 整数型
  .成员 ptx, 整数型
  .成员 pty, 整数型

窗口信息探测代码

.版本 2
.程序集 窗口程序集1
.程序集变量 句柄, 整数型
.程序集变量 获取值, 整数型
.程序集变量 获取文本, 文本型
.子程序 _时钟1_周期事件
.局部变量 光标位置, POINT, 静态
.局部变量 窗口大小, RECT, 静态
GetCursorPos (光标位置)
获取值 = WindowFromPoint (光标位置.x, 光标位置.y)
.如果真 (获取值 ≠ 句柄)
  句柄 = 获取值
  窗口句柄.内容 = “(&H” + 取十六进制文本 (获取值) + “)” + 到文本 (获取值)
  获取文本 = 取空白文本 (255)
  SendMessage (句柄, #WM_GETTEXT, 256, 获取文本)
  窗口标题.内容 = 获取文本
  获取文本 = 取空白文本 (255)
  GetClassName (句柄, 获取文本, 255)
  窗口类名.内容 = 获取文本
  获取值 = GetClassLong (句柄, -32)
  窗口类值.内容 = “(&H” + 取十六进制文本 (获取值) + “)” + 到文本 (获取值)
  获取值 = GetWindowLong (句柄, -16)
  窗口风格.内容 = “(&H” + 取十六进制文本 (获取值) + “)” + 到文本 (获取值)
  获取值 = GetWindowLong (句柄, -6)
  窗口扩展风格.内容 = “(&H” + 取十六进制文本 (获取值) + “)” + 到文本 (获取值)
  获取值 = GetWindowLong (句柄, -12)
  窗口ID.内容 = “(&H” + 取十六进制文本 (获取值) + “)” + 到文本 (获取值)
  GetWindowRect (句柄, 窗口大小)
  窗口范围.内容 = 到文本 (窗口大小.Left) + “ ” + 到文本 (窗口大小.Top) + “ ” + 到文本 (窗口大小.Right) + “ ” + 到文本 (窗口大小.Bottom)
.如果真结束

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

(0)

相关推荐

  • 易语言多个窗口操作实现

    插入窗口 启动窗口 子窗口 以上就关于易语言多窗口的步骤,感谢大家对我们的支持.

  • 易语言枚举所有子窗口讲解

    在易语言开发中,有时想直接从一个窗口中拿取 窗口下所有控件的信息,可以用window知道的api入手,但是精益模块有带有这个功能哦. 窗口_枚举所有子窗口() 三个参数: 一.欲寻找控件的窗口句柄 二.查询出来的所有子窗口句柄数组 三.查询的控件类名 对于前两个参数,相信大家都知道,第一个就是 窗口的句柄,第二个就是 句柄的数组(这个是返回的数组)  . 至于第三个参数,楼主和大家一样,第一眼看到有点迷茫,不知道从何下手,比如编辑框控件的类名是什么?标签控件的类名是什么?这里有个好方法,让大家知

  • 易语言设置热键呼出窗口的代码

    设置热键呼出窗口的代码 .版本 2 .支持库 shellEx .程序集 窗口程序集1 .程序集变量 F3, 整数型 .子程序 __启动窗口_创建完毕 F3 = 注册热键 (_启动窗口.取窗口句柄 (), 热键呼出标签.取窗口句柄 (), 0, #F3键) .子程序 _热键呼出标签_反馈事件, 整数型 .参数 呼出, 整数型 .参数 参数二, 整数型 .如果真 (呼出 = F3) _启动窗口.位置 = 1 ' 1. 居中 2. 最小化 3. 最大化 _启动窗口.总在最前 = 真 处理事件 () _

  • 易语言取窗口左边的方法实例

    首先我们来看下实例代码: .版本 2 .支持库 spec .子程序 _窗口1_创建完毕 kk = API_SetWindowLong (标签1.取窗口句柄 (), -4, 到整数 (&Mycallback)) .子程序 Mycallback, 整数型 .参数 Hwnd .参数 uMsg .参数 消息参数WP .参数 消息参数LP .局部变量 msg, MSG .局部变量 pt, POINTAPI .如果真 (uMsg = 512) ' 移动消息 API_GetMessage (msg, Hwnd

  • 浅析易语言窗口上的"关闭"按钮事件

    就是启动窗口上面的"X",被点击的事件 子程序:__启动窗口_可否被关闭 返回值类型:逻辑型 如果(信息框("确认关闭吗?",0,"关闭提示")=1) 返回(真) 否则 返回(假) 如果结束 返回真就关闭 返回假就不关闭 以上就是相关的代码内容,感谢大家对我们的支持.

  • 易语言防止助手探测窗口的代码

    DLL命令代码 .版本 2 .DLL命令 CallWindowProcA, 整数型, "user32.dll", "CallWindowProcA", , 限制窗口大小 .参数 前一窗口函数地址, 子程序指针 .参数 窗口句柄, 整数型 .参数 消息值, 整数型 .参数 附加参数1, 整数型 .参数 附加参数2, 整数型 .DLL命令 SetWindowLongA, 子程序指针, "user32", "SetWindowLongA&qu

  • 易语言枚举进程通过窗口句柄获取已经登录的QQ号码

    DLL命令表 .版本 2 .DLL命令 GetDesktopWindow, 整数型, "user32.dll", "GetDesktopWindow" .DLL命令 CreateToolhelp32Snapshot, 整数型, "kernel32", "CreateToolhelp32Snapshot" .参数 dwFlags, 整数型, , 0 .参数 th32ProcessIE, 整数型, , 0 .DLL命令 Proce

  • 易语言制作窗口信息探测工具的代码

    DLL命令代码 .版本 2 .DLL命令 GetCursorPos, 逻辑型, "user32.dll", "GetCursorPos" .参数 光标位置, POINT, 传址 .DLL命令 WindowFromPoint, 整数型, "user32.dll", "WindowFromPoint" .参数 X轴光标, 整数型 .参数 Y轴光标, 整数型 .DLL命令 SendMessage, 整数型, , "Send

  • 易语言修改软件版权信息的工具

    DLL命令表 .版本 2 .DLL命令 BeginUpdateResource, 整数型, , "BeginUpdateResourceA" .参数 pFileName, 文本型 .参数 bDeleteExistingResources, 逻辑型 .DLL命令 EndUpdateResource, 逻辑型, , "EndUpdateResourceA" .参数 hUpdate, 整数型 .参数 fDiscard, 逻辑型 .DLL命令 UpdateResource,

  • 易语言制作推箱子小游戏的代码

    DLL命令表 .版本 2 .DLL命令 写配置文件, 整数型, , "WritePrivateProfileStringA", , 如果配置文件不存在则将被创建 .参数 小节名, 文本型, , 就是用中括号括起来的内容 .参数 项目名, 文本型, , 就是等号前边的内容 .参数 项目值, 文本型, , 就是等号后面的内容 .参数 文件名, 文本型, , 就是你要写入的那个文件 .DLL命令 读配置整数, 整数型, , "GetPrivateProfileIntA"

  • 易语言制作图标提取器方法

    图标提取器网上也很多这样的工具,这里我们就用易语言自己做一个,本人也是一边学边应用,代码不一定好,只给大家参考学习用 1.我们先做好图标提取器的界面,添加两个按钮,两个编辑框,适当更改一下窗口的标题和标签说明 2.接着增加一个图片框,设置为凹入式,背景颜色为白,添加标签说明接着增加一个图片框,设置为凹入式,背景颜色为白,添加标签说明 3.接着再添加两个通用对话框,通用对话模型1类型设置为"保存文件",通用对话框2类型设置为"打开文件" 4.界面做好了,再看代码部分,

  • 易语言制作造梦西游桌面版教学

    使用易语言制作造梦西游3桌面版(超详细) 夸张一点说"傻子看了都会" 1.启动易语言主程序 2.双击下图红框所框的地方 3.双击完后即出现下图 4.看旁边(红框) 5.找到宽度和高度,并把高度改为949,高度589,如下图 6.找到超文本浏览框,你可能找不到,在工具-支持库配置-全选-确定-拓展组件-超文本浏览框,之后看右边. 7.然后转到"启动窗口"在下方标题处输入"造梦西游3 6.6版桌面版",当然,别的也行,建议把最小化按钮开下.效果图见最

  • 易语言制作国王的勇士辅助步骤

    用易语言制作国王的勇士辅助 1.打开易语言,双击windows窗口程序,这样就进去了 2.进去之后,左边有属性,调整高度和宽度,比国王的勇士窗口大就行.然后在菜单栏找到工具  支持配置库  全选 然后确定 3.在右边找到超文本浏览框 然后放在你的启动窗口里,然后在左边的地址里输入游戏的网址,然后把超文本框拉平,覆盖全屏 4.然后在右边找到选择夹放到你认为合适的地方,然后拉大. 5.然后在左边找到状态条,然后放在一个你觉得合适的地方,然后右击,找到项目设置,进去之后,先插入,点击插入的空白,在内容

  • 易语言制作随机验证码教学

    如果能帮到你,请支持一下. 易语言制作注册登陆验证码. 随机生成数字字母,大小写字母,易语言验证码! 1.先打开易语言,新建一个窗口. 根据所需绘制基本组件. 我这里绘制的是一个登陆窗口. 2.添加一个分组框,在分组框内添加4个标签,各标签标题大小间距根据需求设置.(注:分组框的目的就是方便同时调整4个标签,在把标签加入到分组框时应该注意,先选中分组框,然后点击组件里面的标签在分组框内绘制.) 3.好了,现在开始写代码了. 打开窗口程序集,Ctrl + L 添加一个程序集变量,验证.文本型 目的

  • 实例讲述易语言拦截窗口消息

    易语言等可视化编程已经将视窗消息封装为对象的属性.方法和事件.当我们在窗口中按下鼠标左键,欲出现信息"你点击了窗体",在易语言中是这样编写的: 子程序:__启动窗口_鼠标左键被按下 返回值类型:逻辑型 参数:横向位置 数据类型:整数型 参数:纵向位置 数据类型:整数型 参数:功能键状态 数据类型:整数型 信息框 ("你点击了窗体", 0, ) 但是如果不用"__启动窗口_鼠标左键被按下"事件能否达到这样的结果?由于对象的事件也只不过是视窗消息的封

  • 易语言制作IP代理程序教学

    IP代理相信大家都比较了解,这里不废话了,这里用易语言制作的也是一个简单的IP代理,只能设置网页的代理,并不能进行全局的IP代理!IP通过网页进行获取! 1.打开易语言,新建windows窗口程序,简单做一个界面,这我们用一个超级列表框来显示获取到的IP 2.先看看采集IP的网址,这里选用快代理,好处就是自带了验证,所以写的软件就不带验证项了. 3.超级列表框设为报表,设置报表列,整行选择为真,显示格线为真! 4.因为用到正则,所以新建一个常量,用于存放匹配表达式,共进行了6处的匹配! 5.看代

  • 易语言隐藏窗口图文教程

    本经验可以帮你的软件添加像气QQ一样的伸缩窗口 新建一个Windows窗口程序 双击启动窗口,输入代码: .版本 2 .支持库 spec .程序集 窗口程序集1 .程序集变量 原窗口, 整数型 .程序集变量 停靠, 整数型, , , 1左,2上,3右,0为不 .程序集变量 正在收放, 整数型, , , 1收,2放 .程序集变量 计数, 整数型 .程序集变量 已收起, 逻辑型 .程序集变量 时钟, 整数型 .程序集变量 步进长度, 整数型, , , 新加的 .程序集变量 最小尺寸, 整数型, ,

随机推荐