TC官方合作论坛

 找回密码
 立即注册
查看: 988|回复: 8
打印 上一主题 下一主题

[已解决] 复制别人的代码枚举游戏窗口,失败。

[复制链接]
跳转到指定楼层
楼主
发表于 2012-10-21 18:35:38 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
//我刚刚复制了别人枚举记事本的代码,做了一下修改,想枚举游戏窗口,梦幻西游。结果不行。代码如下,大神们帮我看看。
#import "dm.dmsoft" dm
空间 枚举2
字符型 枚举返回值  //全局变量

功能 逻辑型 按钮0_点击()
整型 窗口数量
        窗口数量=转换.字符型转整型(编辑框.获得文本("编辑框0"),0)//编辑框获得的是文本型的变量,要进行转换
        循环(窗口数量>0) //窗口数量大于0则继续循环.
                辅助.命令("my.exe",真)     //打开梦幻西游
                窗口数量=窗口数量-1
        循环结束
返回 真
功能结束
功能 逻辑型 开始_点击()
        枚举返回值=系统.枚举("梦幻西游",0) //根据窗口名枚举窗口句柄,支持模糊查询
        标签.设置文本("标签1",枚举返回值)   
返回 真
功能结束

功能 逻辑型 分割_点击()
        整型 数组长度,序号   //定义2个整型变量
        字符型[] 分割返回=字符型[1] //定义一个字符型数组,存放句柄
        字符型 分隔符="|"
        逻辑型 是否成功=字符串.分割(枚举返回值,分隔符,分割返回)
        如果(!是否成功)      
            辅助.消息框("分割失败,结束脚本!")
            辅助.退出()
        如果结束
        数组.大小(分割返回,数组长度)  //计算数组的长度
        循环(序号<数组长度) //数组长度大于0则继续循环
             列表框.增加文本("列表框0",分割返回[序号])   //把分割出来的句柄一个一个添加到列表框
             序号=序号+1  
        循环结束
返回 真
功能结束

功能 逻辑型 激活_点击()
        整型 窗口句柄
        窗口句柄=转换.字符型转整型(列表框.得到选中文本("列表框0"),0) //把选中的句柄赋值给变量,要把文本转成整型
        窗口.激活(窗口句柄)
返回 真
功能结束

空间结束
回复

使用道具 举报

6#
发表于 2012-10-21 21:00:42 | 只看该作者
直接用TC  自带的  系统.枚举("梦幻西游ONLINE",0)
就可以直接枚举到
这个用的就是TC自带的枚举  枚举的游戏窗口
梦幻西游单开喊话脚本
http://bbs.tyuyan.com/thread-17433-1-1.html
回复 支持 反对

使用道具 举报

9#
 楼主| 发表于 2012-10-21 22:20:56 | 只看该作者
回复 2楼shine宝宝的帖子

可以打开梦幻西游.exe,但是打开失败,

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复 支持 反对

使用道具 举报

8#
 楼主| 发表于 2012-10-21 22:08:49 | 只看该作者
回复 6楼wl_20110226的帖子

谢谢,我又改了一下,成功了。高兴死我了。
回复 支持 反对

使用道具 举报

7#
 楼主| 发表于 2012-10-21 21:36:15 | 只看该作者
回复 2楼shine宝宝的帖子

姐姐,我如果知道就不问了。
回复 支持 反对

使用道具 举报

5#
发表于 2012-10-21 20:40:23 | 只看该作者
参数:
1、是否排序(数字0~5)
   0表示按启动时间排序
   1表示升序排序
   2表示降序排序
   3表示按启动时间排序,第一个结果返回窗口数量,以后依次返回窗口句柄
   4表示不排序,第一个结果返回窗口数量,以后依次返回窗口句柄
   5表示不排序返回
2、句柄寻找方式(数字0~5)
   0表示采用Gethwnd方式
   1表示采用GethwndN方式
   2表示采用GethwndM方式
   3表示采用GetChildHwndM方式
   4表示采用GethwndD方式
   5表示采用GethwndS方式
3、识别条件,此参数可为多个(分别为识别字符,识别内容类型和识别方式),必须是3的倍数,依次写入,识别字符,识别类别和识别方式,例如: "标题",0,1,"类",2,0,"路径",3,0,后面还可以增加,增加的三项解释如下:
   (1)、识别内容(字符串),单纯数字也可以写数字
   (2)、识别内容类型(数字0~24)
      0表示识别标题
      1表示识别程序名称
      2表示识别类
      3表示识别路径
      4表示识别父句柄
      5表示识别父标题
      6表示识别父类
      7表示识别顶级窗口句柄
      8表示识别顶级窗口标题
      9表示识别顶级窗口类
      10表示识别窗口常规样式
      11表示识别窗口扩展样式
      12表示窗口是否处于活动状态(1表示是,0表示否)
      13表示窗口是否为Unicode窗口(1表示是,0表示否)
      14表示窗口是否可见(1表示是,0表示否)
      15表示窗口是否最大化(1表示是,0表示否)
      16表示窗口是否最小化(1表示是,0表示否)
      17表示窗口大小是否为0(1表示是,0表示否)
      18表示窗口左上角X坐标
      19表示窗口左上角Y坐标
      20表示窗口右下角X坐标
      21表示窗口右下角Y坐标
      22表示窗口宽
      23表示窗口高
      24表示窗口内容
   (3)、识别内容类型的识别方式(数字0~8)
      0表示精确对比,相当于=,区分大小写,支持全部识别内容类型
      1表示模糊对比,判断是否包含相关内容,不区分大小写,能进行此类比较的识别内容类型为0~3、5、6、8~11,其余4、7,12~23进行精确判断
      2表示类型匹配,类似于iFormat_Check函数,使用like判断,能进行此类比较的识别内容类型为0~3、5、6、8、9和24,其余10、11进行模糊对比,4、7,12~23进行精确判断
      3表示用≥对比,能进行此类比较的识别内容类型为18~23,其余10、11进行模糊对比,4、7,12~23进行精确判断,0~3、5、6、8、9和24进行模糊对比
      4表示用>对比,能进行此类比较的识别内容类型为18~23,其余10、11进行模糊对比,4、7,12~17进行精确判断,0~3、5、6、8、9和24进行模糊对比
      5表示用≤对比,能进行此类比较的识别内容类型为18~23,其余10、11进行模糊对比,4、7,12~17进行精确判断,0~3、5、6、8、9和24进行模糊对比
      6表示用<对比,能进行此类比较的识别内容类型为18~23,其余10、11进行模糊对比,4、7,12~17进行精确判断,0~3、5、6、8、9和24进行模糊对比
      7表示用<>对比,其中4、7,12~23采用<>比较,其余的为不包含处理,忽略大小写
      8表示用<>对比,其中10,11为不包含处理,其余的采用<>处理,忽略大小写
回复 支持 反对

使用道具 举报

地板
发表于 2012-10-21 20:39:12 | 只看该作者
会用大兵吗 很不错的找窗口函数  你就搜 梦幻 2个字就能找到了
名称:FindHwndM        <收费函数>  //名为收费实为免费
作用:搜索窗口句柄增强版
--------------------------------------------------
函数所属类:DBSoft_Window
VB、VBS引用方式(其他语言可参考):
Set DBSoft_Window = CreateObject("DBSoft.DBSoft_Window")
--------------------------------------------------
函数补存说明:
识别同GetHwnd函数,只是增加了搜索条件
--------------------------------------------------
函数返回:
返回一维数组,失败均返回0
回复 支持 反对

使用道具 举报

板凳
发表于 2012-10-21 20:29:23 | 只看该作者
梦幻西游 窗口名 会变的吧
枚举类名 试试
回复 支持 反对

使用道具 举报

沙发
发表于 2012-10-21 19:02:41 | 只看该作者
哪里不行 说清楚。。这么多 懒得看啊= =
回复 支持 反对

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18043773号

GMT+8, 2025-10-9 19:45 , Processed in 0.203240 second(s), 26 queries .

Powered by 海安天坑软件科技有限公司

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表