取值 改标题

keyulin

  

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

变量名	类 型	静态	数组	备 注
c	整数型
ID数组	整数型		0
句柄	整数型
句柄数组	整数型		0
进程ID	整数型
基址	整数型
进程句柄	整数型
偏移2	整数型
偏移3	整数型
偏移4	整数型
a	文本型		0
数组成员数	整数型
i	整数型
文本数组	文本型		0
人物ID	文本型

进程_取ID数组 (“xxx.exe”, ID数组, )
进程ID ＝ 进程_名取ID (“YXS.exe”)
文本数组 ＝ 分割文本 (编辑框_名单.内容, #换行符, )
数组成员数 ＝ 取数组成员数 (文本数组)
计次循环首 (取数组成员数 (ID数组), c)
句柄 ＝ 进程_ID取窗口句柄 (ID数组 [c])
加入成员 (句柄数组, 句柄)
进程句柄 ＝ 取模块句柄ex (进程ID, “xxx.exe”) ’取值做对比用
基址 ＝ 读内存整数型 (进程ID, 进程句柄 ＋ 十六到十 (“xxxx”))
偏移2 ＝ 读内存整数型 (进程ID, 基址 ＋ 十六到十 (“xxxx”))
偏移3 ＝ 读内存整数型 (进程ID, 偏移2 ＋ 十六到十 (“xxxx”))
偏移4 ＝ 读内存整数型 (进程ID, 偏移3 ＋ 十六到十 (“xxxx”))
调试输出 (偏移4)
人物ID ＝ 到文本 (偏移4)
计次循环首 (数组成员数, i)
a ＝ 分割文本 (文本数组 [i], “----”, )    ‘编辑框文本分割后得到前后 前面做对比  后面做标题
如果真 (取数组成员数 (a) ≥ 1)
如果真 (a [1] ＝ 人物ID)
' 自己标签.标题 ＝ “我”
如果真 (取数组成员数 (a) ≥ 2)
窗口_置标题 (句柄, a [2])



计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 c, 整数型<br /> .局部变量 ID数组, 整数型, , "0"<br /> .局部变量 句柄, 整数型<br /> .局部变量 句柄数组, 整数型, , "0"<br /> .局部变量 进程ID, 整数型<br /> .局部变量 基址, 整数型<br /> .局部变量 进程句柄, 整数型<br /> .局部变量 偏移2, 整数型<br /> .局部变量 偏移3, 整数型<br /> .局部变量 偏移4, 整数型<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 数组成员数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 人物ID, 文本型<br /> <br /> 进程_取ID数组 (“xxx.exe”, ID数组, )<br /> 进程ID ＝ 进程_名取ID (“YXS.exe”)<br /> <br /> 文本数组 ＝ 分割文本 (编辑框_名单.内容, #换行符, )<br /> 数组成员数 ＝ 取数组成员数 (文本数组)<br /> <br /> .计次循环首 (取数组成员数 (ID数组), c)<br />     句柄 ＝ 进程_ID取窗口句柄 (ID数组 [c])<br />     加入成员 (句柄数组, 句柄)<br />     进程句柄 ＝ 取模块句柄ex (进程ID, “xxx.exe”) ’取值做对比用<br />     基址 ＝ 读内存整数型 (进程ID, 进程句柄 ＋ 十六到十 (“xxxx”))<br />     偏移2 ＝ 读内存整数型 (进程ID, 基址 ＋ 十六到十 (“xxxx”))<br />     偏移3 ＝ 读内存整数型 (进程ID, 偏移2 ＋ 十六到十 (“xxxx”))<br />     偏移4 ＝ 读内存整数型 (进程ID, 偏移3 ＋ 十六到十 (“xxxx”))<br />     调试输出 (偏移4)<br />     人物ID ＝ 到文本 (偏移4)<br />     .计次循环首 (数组成员数, i)<br /> <br />         a ＝ 分割文本 (文本数组 <i>, “----”, )    ‘编辑框文本分割后得到前后 前面做对比  后面做标题<br />         .如果真 (取数组成员数 (a) ≥ 1)<br />             .如果真 (a [1] ＝ 人物ID)<br />                 ' 自己标签.标题 ＝ “我”<br />                 .如果真 (取数组成员数 (a) ≥ 2)<br />                     窗口_置标题 (句柄, a [2])<br />                 .如果真结束<br /> <br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()

我这样取只能取一个值出来 有两组值它把两组值都取了第一个值   比如多开窗口后 读出所有窗口的值然后做对比  对上的直接分割后的a[2] 置标题上
哪个大佬 能帮我看看 谢了



补充内容 (2018-10-5 12:43):
思路错了  我应该要的是取进程数组后  怎么分割成 一个个单独ID 然后提取 数据 再发送到相应的窗口标题上

恶魔の佐翼

.版本 2

.局部变量 句柄, 整数型
.局部变量 窗口类名, 文本型
.局部变量 进程ID, 整数型
.局部变量 人物ID, 文本型

窗口类名 ＝ “SciCalc”
句柄 ＝ FindWindowEx (0, 0, 窗口类名, 0)  ' 查找窗口
.判断循环首 (句柄 ≠ 0)
    GetWindowThreadProcessId (句柄, 进程ID)  ' 窗口句柄取进程ID
    ' 人物ID=读内存整数型 (, )
    SetWindowText (句柄, 人物ID)  ' 设置窗口标题
    句柄 ＝ FindWindowEx (0, 句柄, 窗口类名, 0)  ' 查找窗口
.判断循环尾 ()
.版本 2

.DLL命令 FindWindowEx, 整数型, "user32", "FindWindowExA", , 在窗口列表中寻找与指定条件相符的第一个子窗口  找到的窗口的句柄。如未找到相符窗口，则返回零。会设置GetLastError
    .参数 hWnd1, 整数型, , 在其中查找子的父窗口。如设为零，表示使用桌面窗口（通常说的顶级窗口都被认为是桌面的子窗口，所以也会对它们进行查找）
    .参数 hWnd2, 整数型, , 从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零，表示从第一个子窗口开始搜索
    .参数 lpsz1, 文本型, , 欲搜索的类名。零表示忽略
    .参数 lpsz2, 整数型, , 欲搜索的类名。零表示忽略;

.DLL命令 GetWindowThreadProcessId, 整数型, "user32.dll", "GetWindowThreadProcessId"
    .参数 hwnd, 整数型, , 指定窗口句柄
    .参数 lpdwProcessId, 整数型, 传址, 指定一个变量，用于装载拥有那个窗口的一个进程的标识符

.DLL命令 OpenProcess, 整数型, "kernel32", "OpenProcess", , , 将句柄返回给过程对象
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 整数型
    .参数 dwProcessId, 整数型

.DLL命令 ReadProcessMemory, 整数型, "kernel32", "ReadProcessMemory", , , 在进程中读内存
    .参数 hProcess, 整数型
    .参数 lpBaseAddress, 整数型
    .参数 lpBuffer, 整数型, 传址
    .参数 nSize, 整数型
    .参数 lpNumberOfBytesWritten, 整数型

.DLL命令 CloseHandle, 整数型, "kernel32", "CloseHandle", , , 关闭一个内核对象。其中包括文件、文件映射、进程、线程、安全和同步对象等。涉及文件处理时，这个函数通常与vb的close命令相似。应尽可能的使用close，因为它支持vb的差错控制。注意这个函数使用的文件句柄与vb的文件编号是完全不同的  非零表示成功，零表示失败。会设置GetLastError
    .参数 hObject, 整数型, , 欲关闭的一个对象的句柄;

.DLL命令 SetWindowText, 整数型, "user32", "SetWindowTextA", , 设置窗口的标题文字或控件的内容（在vb里使用：针对vb窗体，应使用caption或text属性）  非零表示成功，零表示失败。会设置GetLastError
    .参数 hwnd, 整数型
    .参数 lpString, 文本型

恶魔の佐翼

哪个游戏啊?赚钱不?一起搞啊....

keyulin

恶魔の佐翼 发表于 2018-10-5 08:59
哪个游戏啊?赚钱不?一起搞啊....

纯属自己娱乐  没卖

jr21066

多开的话.可以枚举所有窗口.比较进程名

[易]晴空

进程_取同名ID (, )
用这命令取进程ID  然后在去取句柄

keyulin

[易]晴空 发表于 2018-10-5 09:09
进程_取同名ID (, )
用这命令取进程ID  然后在去取句柄

等会儿我试试 先谢了

keyulin

jr21066 发表于 2018-10-5 09:03
多开的话.可以枚举所有窗口.比较进程名

进程名都一样的

补充内容 (2018-10-5 11:25):
多开是多开 现在不是取窗口跟进程对比
而是进程跟窗口都取好了  取数据 只能在第一个窗口内取值
不能取到数组的其他窗口值

恶魔の佐翼

自己复制代码了

keyulin

恶魔の佐翼 发表于 2018-10-5 13:55
自己复制代码了

谢谢了   我试试