易语言隐藏外部程序窗口源码

.版本 2
.支持库 eAPI

.程序集 窗口程序集1
.程序集变量 HWND, 长整数型

.子程序 _按钮1_被单击

.如果真 (HWND ＝ 0)
    HWND ＝ 进程取句柄 (“360SE.exe”)
.如果真结束

.如果 (进程取句柄 (“360SE.exe”) ＝ 0)  ' 窗口被隐藏是取不到句柄,用这来判断是否隐藏
    ShowWindow (HWND, 5)
.否则
    ShowWindow (HWND, 0)
.如果结束


.子程序 进程取句柄, 整数型, , 区分大小写
.参数 进程名, 文本型
.局部变量 所有句柄, 文本型, , "0"
.局部变量 计次1, 整数型
.局部变量 进程ID, 整数型
.局部变量 所有进程, 进程信息, , "0"
.局部变量 计次2, 整数型
.局部变量 指定进程ID, 整数型
.局部变量 保存, 文本型

所有句柄 ＝ 取所有窗口列表 ()
所有进程 ＝ 取系统进程列表 ()
.计次循环首 (取数组成员数 (所有进程), 计次2)
    .如果真 (所有进程 [计次2].进程名称 ＝ 进程名)
        指定进程ID ＝ 所有进程 [计次2].进程标识符
        跳出循环 ()
    .如果真结束

.计次循环尾 ()
.计次循环首 (取数组成员数 (所有句柄), 计次1)
    GetWindowThreadProcessId (到数值 (所有句柄 [计次1]), 进程ID)
    保存 ＝ “”
    .如果真 (进程ID ＝ 指定进程ID)
        保存 ＝ 所有句柄 [计次1]
        跳出循环 ()
    .如果真结束

.计次循环尾 ()
返回 (到整数 (保存))


.子程序 __启动窗口_创建完毕

@asfor78