精易模块V6.31【进程_ID取窗口句柄】错误的逻辑BUG修改

无敌小白

命令： 进程_ID取窗口句柄
系统环境：任何系统下
错误说明：参数二，参数三，只有在填写不存在的标题与类名时，才会返回0。否则一律返回句柄，错误的判断逻辑，两个参数等于没有任何用处。
联系QQ：964477707


源代码

  

子程序名	返回值类型	公开	备 注
进程_ID取窗口句柄	整数型		通过进程ID取得该进程的窗口句柄,超时则返回零
参数名	类 型	参考	可空	数组	备 注
进程ID	整数型				该进程的ID;
窗口标题	文本型				模糊参数 如果为空,忽略此参数
窗口类名	文本型				模糊参数 如果为空,忽略此参数
超时	整数型				为空则无限循环

变量名	类 型	静态	数组	备 注
局_超时时间
局_开始时间
局_窗口句柄
局_进程ID
局_标题	文本型
局_类名	文本型

局_开始时间 ＝ 取启动时间 ()
局_超时时间 ＝ 选择 (是否为空 (超时) 或 超时 ＝ -1, 31536000, 超时)
判断循环首 (取启动时间 () － 局_开始时间 ＜ 局_超时时间)
局_窗口句柄 ＝ FindWindowExA_文本 (0, 局_窗口句柄, 字符 (0), 字符 (0))
如果真 (IsWindow (局_窗口句柄) ＝ 1)
如果真 (IsWindowVisible (局_窗口句柄))
局_进程ID ＝ 窗口_句柄取进程ID (局_窗口句柄)
如果真 (局_进程ID ＝ 进程ID)
局_标题 ＝ 窗口_取标题 (局_窗口句柄)
局_类名 ＝ 窗口_取类名 (局_窗口句柄)
如果真 (寻找文本 (局_标题, 窗口标题, , 假) ≠ -1)
返回 (局_窗口句柄)
' 错误：标题参数为空，就直接返回句柄了。

如果真 (寻找文本 (局_类名, 窗口类名, , 假) ≠ -1)
返回 (局_窗口句柄)
' 错误：即使标题不匹配，或者类名参数为空，也会返回句柄

如果真 (是否为空 (窗口标题) 或 是否为空 (窗口类名))
返回 (局_窗口句柄)
' 错误：这一步根本就走不到这里，这是一个无用的判断。是否为空要第一时间判断，否则为空文本参数=“”去使用了



处理事件 ()
判断循环尾 ()
返回 (0)

.版本 2<br /> <br /> .子程序 进程_ID取窗口句柄, 整数型, 公开, 通过进程ID取得该进程的窗口句柄,超时则返回零<br /> .参数 进程ID, 整数型, , 该进程的ID;<br /> .参数 窗口标题, 文本型, 可空, 模糊参数 如果为空,忽略此参数<br /> .参数 窗口类名, 文本型, 可空, 模糊参数 如果为空,忽略此参数<br /> .参数 超时, 整数型, 可空, 为空则无限循环<br /> .局部变量 局_超时时间<br /> .局部变量 局_开始时间<br /> .局部变量 局_窗口句柄<br /> .局部变量 局_进程ID<br /> .局部变量 局_标题, 文本型<br /> .局部变量 局_类名, 文本型<br /> <br /> 局_开始时间 ＝ 取启动时间 ()<br /> 局_超时时间 ＝ 选择 (是否为空 (超时) 或 超时 ＝ -1, 31536000, 超时)<br /> .判断循环首 (取启动时间 () － 局_开始时间 ＜ 局_超时时间)<br />     局_窗口句柄 ＝ FindWindowExA_文本 (0, 局_窗口句柄, 字符 (0), 字符 (0))<br />     .如果真 (IsWindow (局_窗口句柄) ＝ 1)<br />         .如果真 (IsWindowVisible (局_窗口句柄))<br />             局_进程ID ＝ 窗口_句柄取进程ID (局_窗口句柄)<br />             .如果真 (局_进程ID ＝ 进程ID)<br />                 局_标题 ＝ 窗口_取标题 (局_窗口句柄)<br />                 局_类名 ＝ 窗口_取类名 (局_窗口句柄)<br />                 .如果真 (寻找文本 (局_标题, 窗口标题, , 假) ≠ -1)<br />                     返回 (局_窗口句柄)<br />                     ' 错误：标题参数为空，就直接返回句柄了。<br />                 .如果真结束<br /> <br />                 .如果真 (寻找文本 (局_类名, 窗口类名, , 假) ≠ -1)<br />                     返回 (局_窗口句柄)<br />                     ' 错误：即使标题不匹配，或者类名参数为空，也会返回句柄<br />                 .如果真结束<br /> <br />                 .如果真 (是否为空 (窗口标题) 或 是否为空 (窗口类名))<br />                     返回 (局_窗口句柄)<br />                     ' 错误：这一步根本就走不到这里，这是一个无用的判断。是否为空要第一时间判断，否则为空文本参数=“”去使用了<br />                 .如果真结束<br /> <br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .如果真结束<br />     处理事件 ()<br /> .判断循环尾 ()<br /> 返回 (0)

本人修改方案，已经过多次测试通过。

  

子程序名	返回值类型	公开	备 注
进程_ID取窗口句柄	整数型		通过进程ID取得该进程的窗口句柄,超时则返回零
参数名	类 型	参考	可空	数组	备 注
进程ID	整数型				该进程的ID;
窗口标题	文本型				模糊参数 如果为空,忽略此参数
窗口类名	文本型				模糊参数 如果为空,忽略此参数
超时	整数型				为空则无限循环

变量名	类 型	静态	数组	备 注
局_超时时间
局_开始时间
局_窗口句柄
局_进程ID
局_标题	文本型
局_类名	文本型

局_开始时间 ＝ 取启动时间 ()
局_超时时间 ＝ 选择 (是否为空 (超时) 或 超时 ＝ -1, 31536000, 超时)
判断循环首 (取启动时间 () － 局_开始时间 ＜ 局_超时时间)
局_窗口句柄 ＝ FindWindowExA_文本 (0, 局_窗口句柄, 字符 (0), 字符 (0))
如果真 (IsWindow (局_窗口句柄) ＝ 1)
如果真 (IsWindowVisible (局_窗口句柄))
局_进程ID ＝ 窗口_句柄取进程ID (局_窗口句柄)
如果真 (局_进程ID ＝ 进程ID)
局_标题 ＝ 窗口_取标题 (局_窗口句柄)
局_类名 ＝ 窗口_取类名 (局_窗口句柄)
判断 (是否为空 (窗口标题) 且 是否为空 (窗口类名))
返回 (局_窗口句柄)
' 两个参数为空，直接返回句柄.
判断 (是否为空 (窗口标题))
如果真 (寻找文本 (局_类名, 窗口类名, , 假) ≠ -1)
返回 (局_窗口句柄)
' 如果窗口标题参数为空，则判断类名，存在即返回句柄。

判断 (是否为空 (窗口类名))
如果真 (寻找文本 (局_标题, 窗口标题, , 假) ≠ -1)
返回 (局_窗口句柄)
' 如果类名参数为空，则判断标题，存在即返回句柄

如果真 (寻找文本 (局_标题, 窗口标题, , 假) ≠ -1 且 寻找文本 (局_类名, 窗口类名, , 假) ≠ -1)
返回 (局_窗口句柄)
' 如果两个参数都存在，则匹配2个满足条件时，返回句柄。

返回 (0)  ' 进程ID的唯一性，以上不满足的话，这里要直接返回0了。


处理事件 ()
判断循环尾 ()
返回 (0)

.版本 2<br /> <br /> .子程序 进程_ID取窗口句柄, 整数型, 公开, 通过进程ID取得该进程的窗口句柄,超时则返回零<br /> .参数 进程ID, 整数型, , 该进程的ID;<br /> .参数 窗口标题, 文本型, 可空, 模糊参数 如果为空,忽略此参数<br /> .参数 窗口类名, 文本型, 可空, 模糊参数 如果为空,忽略此参数<br /> .参数 超时, 整数型, 可空, 为空则无限循环<br /> .局部变量 局_超时时间<br /> .局部变量 局_开始时间<br /> .局部变量 局_窗口句柄<br /> .局部变量 局_进程ID<br /> .局部变量 局_标题, 文本型<br /> .局部变量 局_类名, 文本型<br /> <br /> 局_开始时间 ＝ 取启动时间 ()<br /> 局_超时时间 ＝ 选择 (是否为空 (超时) 或 超时 ＝ -1, 31536000, 超时)<br /> .判断循环首 (取启动时间 () － 局_开始时间 ＜ 局_超时时间)<br />     局_窗口句柄 ＝ FindWindowExA_文本 (0, 局_窗口句柄, 字符 (0), 字符 (0))<br />     .如果真 (IsWindow (局_窗口句柄) ＝ 1)<br />         .如果真 (IsWindowVisible (局_窗口句柄))<br />             局_进程ID ＝ 窗口_句柄取进程ID (局_窗口句柄)<br />             .如果真 (局_进程ID ＝ 进程ID)<br />                 局_标题 ＝ 窗口_取标题 (局_窗口句柄)<br />                 局_类名 ＝ 窗口_取类名 (局_窗口句柄)<br />                 .判断开始 (是否为空 (窗口标题) 且 是否为空 (窗口类名))<br />                     返回 (局_窗口句柄)<br />                     ' 两个参数为空，直接返回句柄.<br />                 .判断 (是否为空 (窗口标题))<br />                     .如果真 (寻找文本 (局_类名, 窗口类名, , 假) ≠ -1)<br />                         返回 (局_窗口句柄)<br />                         ' 如果窗口标题参数为空，则判断类名，存在即返回句柄。<br />                     .如果真结束<br /> <br />                 .判断 (是否为空 (窗口类名))<br />                     .如果真 (寻找文本 (局_标题, 窗口标题, , 假) ≠ -1)<br />                         返回 (局_窗口句柄)<br />                         ' 如果类名参数为空，则判断标题，存在即返回句柄<br />                     .如果真结束<br /> <br />                 .默认<br />                     .如果真 (寻找文本 (局_标题, 窗口标题, , 假) ≠ -1 且 寻找文本 (局_类名, 窗口类名, , 假) ≠ -1)<br />                         返回 (局_窗口句柄)<br />                         ' 如果两个参数都存在，则匹配2个满足条件时，返回句柄。<br />                     .如果真结束<br /> <br />                 .判断结束<br />                 返回 (0)  ' 进程ID的唯一性，以上不满足的话，这里要直接返回0了。<br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .如果真结束<br />     处理事件 ()<br /> .判断循环尾 ()<br /> 返回 (0)

良龙大哥

看样子楼主很屌

猩火燎原

请问这个 超时参数  单位是秒吗

udbaifd

修改成这样  bug

qcyxq1

项目部002

收到反馈，立马修改