易语言临时修改任意窗口标题和永久修改窗口标题

511遇见

临时修改前台任意窗口标题采用的是 SetWindowTextA，当我们关闭了进程，重新创建进程时，标题是不会变化的，我们称之为临时改变标题，要想永久改变，就得取的原来标题所占字节集的长度，再替换字节集，最后写出新的文件。这里我们分别学习这两种方法和源码。这里修改标题，并不是指自身，相反，编译后自身是的标题是无法修改的，是指其他进程的窗口标题，调试时可以修改自身的标题。
临时修改用到的API，前提是前台没有窗口标题重复的进程。

  

DLL命令名	返回值类型	公开	备 注
SetWindowTextA	整数型
DLL库文件名:
user32
在DLL库中对应命令名:
SetWindowTextA
参数名	类 型	传址	数组	备 注
窗口句柄	整数型
窗口标题	文本型

DLL命令名	返回值类型	公开	备 注
FindWindowExA	整数型		寻找窗口句柄
DLL库文件名:
user32
在DLL库中对应命令名:
FindWindowExA
参数名	类 型	传址	数组	备 注
hwndParent	整数型			父窗口句柄
hwndChildAfter	整数型			子窗口句柄
lpszClass	文本型			类名
lpszWindow	文本型			标题

.版本 2<br /> <br /> .DLL命令 SetWindowTextA, 整数型, "user32", "SetWindowTextA"<br />     .参数 窗口句柄, 整数型<br />     .参数 窗口标题, 文本型<br /> <br /> .DLL命令 FindWindowExA, 整数型, "user32", "FindWindowExA", , 寻找窗口句柄<br />     .参数 hwndParent, 整数型, , 父窗口句柄<br />     .参数 hwndChildAfter, 整数型, , 子窗口句柄<br />     .参数 lpszClass, 文本型, , 类名<br />     .参数 lpszWindow, 文本型, , 标题

封装修改子程序和调用：

  

子程序名	返回值类型	公开	备 注
修改窗口标题	逻辑型		修改指定窗口的窗口标题,成功返回真,否则返回假
参数名	类 型	参考	可空	数组	备 注
原窗口标题	文本型				可为窗口标题的一部分
新标题	文本型

变量名	类 型	静态	数组	备 注
句柄	整数型
临时标题	文本型

句柄 ＝ 窗口_取句柄ExA (, , , 原窗口标题)
如果 (句柄 ≠ 0)
如果 (SetWindowTextA (句柄, 新标题) ≠ 0)
返回 (真)
返回 (假)

返回 (假)

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

输出调试文本 (修改窗口标题 (“呵呵”, “123”))

子程序名	返回值类型	公开	备 注
窗口_取句柄ExA	整数型	√	成功返回窗口句柄，失败返回0
参数名	类 型	参考	可空	数组	备 注
父窗口句柄	整数型		√
子窗口句柄	整数型		√
窗口类名	文本型		√
窗口标题	文本型		√

返回 (FindWindowExA (父窗口句柄, 子窗口句柄, 窗口类名, 窗口标题))

.版本 2<br /> <br /> .子程序 修改窗口标题, 逻辑型, , 修改指定窗口的窗口标题,成功返回真,否则返回假<br /> .参数 原窗口标题, 文本型, , 可为窗口标题的一部分<br /> .参数 新标题, 文本型<br /> .局部变量 句柄, 整数型<br /> .局部变量 临时标题, 文本型<br /> <br /> 句柄 ＝ 窗口_取句柄ExA (, , , 原窗口标题)<br /> .如果 (句柄 ≠ 0)<br />     .如果 (SetWindowTextA (句柄, 新标题) ≠ 0)<br />         返回 (真)<br />     .否则<br />         返回 (假)<br />     .如果结束<br /> <br /> .否则<br />     返回 (假)<br /> .如果结束<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 输出调试文本 (修改窗口标题 (“呵呵”, “123”))<br /> <br /> .子程序 窗口_取句柄ExA, 整数型, 公开, 成功返回窗口句柄，失败返回0<br /> .参数 父窗口句柄, 整数型, 可空<br /> .参数 子窗口句柄, 整数型, 可空<br /> .参数 窗口类名, 文本型, 可空<br /> .参数 窗口标题, 文本型, 可空<br /> <br /> 返回 (FindWindowExA (父窗口句柄, 子窗口句柄, 窗口类名, 窗口标题))

临时修改的还可以这样封装

  

子程序名	返回值类型	公开	备 注
修改窗口标题	逻辑型		修改指定窗口的窗口标题,成功返回真,否则返回假
参数名	类 型	参考	可空	数组	备 注
原窗口标题	文本型				可为窗口标题的一部分
新标题	文本型

变量名	类 型	静态	数组	备 注
句柄	整数型
临时标题	文本型

句柄 ＝ GetForegroundWindow ()
判断循环首 (句柄 ≠ 0)
临时标题 ＝ 取窗口标题 (句柄)
如果真 (寻找文本 (临时标题, 原窗口标题, , 假) ＞ 0)
调试输出 (临时标题)
跳出循环 ()
句柄 ＝ GetWindow (句柄, 2)
判断循环尾 ()
如果 (句柄 ≠ 0)
如果 (SetWindowTextA (句柄, 新标题) ≠ 0)
返回 (真)
返回 (假)

返回 (假)

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

输出调试文本 (修改窗口标题 (“呵呵”, “123”))

i支持库列表	支持库注释
eAPI	应用接口支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 eAPI<br /> .支持库 spec<br /> <br /> .子程序 修改窗口标题, 逻辑型, , 修改指定窗口的窗口标题,成功返回真,否则返回假<br /> .参数 原窗口标题, 文本型, , 可为窗口标题的一部分<br /> .参数 新标题, 文本型<br /> .局部变量 句柄, 整数型<br /> .局部变量 临时标题, 文本型<br /> <br /> 句柄 ＝ GetForegroundWindow ()<br /> .判断循环首 (句柄 ≠ 0)<br />     临时标题 ＝ 取窗口标题 (句柄)<br />     .如果真 (寻找文本 (临时标题, 原窗口标题, , 假) ＞ 0)<br />         调试输出 (临时标题)<br /> <br />         跳出循环 ()<br />     .如果真结束<br />     句柄 ＝ GetWindow (句柄, 2)<br /> <br /> .判断循环尾 ()<br /> .如果 (句柄 ≠ 0)<br /> <br />     .如果 (SetWindowTextA (句柄, 新标题) ≠ 0)<br />         返回 (真)<br />     .否则<br />         返回 (假)<br />     .如果结束<br /> <br /> .否则<br />     返回 (假)<br /> .如果结束<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 输出调试文本 (修改窗口标题 (“呵呵”, “123”))

永久写入修改标题：

  

子程序名	返回值类型	公开	备 注
永久修改标题
参数名	类 型	参考	可空	数组	备 注
参_原程序地址
参_原程序标题
参_新程序标题

变量名	类 型	静态	数组	备 注
文件字节集	字节集
标题位置	整数型
补空字节集	字节集
原来长度	整数型
改后长度	整数型

文件字节集 ＝ 读入文件 (参_原程序地址)
标题位置 ＝ 寻找字节集 (文件字节集, 到字节集 (参_原程序标题), )
原来长度 ＝ 取字节集长度 (到字节集 (参_原程序标题))
改后长度 ＝ 取字节集长度 (到字节集 (参_新程序标题))
补空字节集 ＝ 取空白字节集 (原来长度 － 改后长度)
文件字节集 ＝ 字节集替换 (文件字节集, 标题位置, 原来长度, 到字节集 (参_新程序标题) ＋ 补空字节集)
写到文件 (参_原程序地址, 文件字节集)

.版本 2<br /> <br /> .子程序 永久修改标题<br /> .参数 参_原程序地址<br /> .参数 参_原程序标题<br /> .参数 参_新程序标题<br /> .局部变量 文件字节集, 字节集<br /> .局部变量 标题位置, 整数型<br /> .局部变量 补空字节集, 字节集<br /> .局部变量 原来长度, 整数型<br /> .局部变量 改后长度, 整数型<br /> <br /> 文件字节集 ＝ 读入文件 (参_原程序地址)<br /> 标题位置 ＝ 寻找字节集 (文件字节集, 到字节集 (参_原程序标题), )<br /> 原来长度 ＝ 取字节集长度 (到字节集 (参_原程序标题))<br /> 改后长度 ＝ 取字节集长度 (到字节集 (参_新程序标题))<br /> 补空字节集 ＝ 取空白字节集 (原来长度 － 改后长度)<br /> 文件字节集 ＝ 字节集替换 (文件字节集, 标题位置, 原来长度, 到字节集 (参_新程序标题) ＋ 补空字节集)<br /> 写到文件 (参_原程序地址, 文件字节集)

源码下载，包括临时的两种和永久修改的方法：
链接：https://pan.baidu.com/s/1BpPPs9opCzgMvkZ832sHPw
提取码：0v0w

解压密码：（回复可见）

游客，如果您要查看本帖隐藏内容请回复