打开窗口问题

我很低调

VX多开-pc版.e (1.05 MB, 下载次数: 10)

2025-4-2 10:16 上传

点击文件名下载附件   帮忙修改下 点击按钮每次只打开一个窗口

神行

.子程序 _图形按钮1_被单击
.局部变量 pidwechat, 整数型, , , 进程ID
.局部变量 urlinstall, 文本型, , , 程序路径
.局部变量 wechatCount, 整数型, , , VX进程计数

' 先尝试解除VX的互斥锁限制
PatchWeChat ()

' 获取当前运行的VX进程数量
wechatCount ＝ 进程_取同名ID ("WeChat.exe",  0)
.如果 (wechatCount ＝ 0)
    ' 如果没有VX运行，直接启动VX
    OpenWeChat ()
.否则
    ' 如果已经有VX运行，只启动一个额外的VX
    .如果真 (wechatCount ＜ 10)  ' 限制最多10个VX实例，防止意外
        pidwechat ＝ 进程_名取ID ("WeChat.exe")
        urlinstall ＝ 进程_取程序路径 (pidwechat)
        文件_执行 (urlinstall)  ' 打开VX副本
    .如果真结束
.如果结束

补充内容 (2025-4-2 13:23):
.子程序 进程_取同名ID, 整数型
.参数 进程名, 文本型
.参数 进程ID数组, 整数型, 参考 可空 数组
.局部变量 hSnap, 整数型
.局部变量 pe32, PROCESSENTRY32
...

约定踏雪去看花

黄仁和你模块没上传

阿捷大大

是无法打开按钮窗口？

神行

神行 发表于 2025-4-2 13:22
.子程序 _图形按钮1_被单击
.局部变量 pidwechat, 整数型, , , 进程ID
.局部变量 urlinstall, 文本型, ,  ...

.子程序 进程_取同名ID, 整数型
.参数 进程名, 文本型
.参数 进程ID数组, 整数型, 参考 可空 数组
.局部变量 hSnap, 整数型
.局部变量 pe32, PROCESSENTRY32
.局部变量 count, 整数型

重定义数组 (进程ID数组, 假, 0)
hSnap ＝ CreateToolhelp32Snapshot (#TH32CS_SNAPPROCESS, 0)
.如果真 (hSnap ＝ #INVALID_HANDLE_VALUE)
    返回 (0)
.如果真结束

pe32.dwSize  ＝ 296
.如果真 (Process32First (hSnap, pe32))
    .循环判断首 ()
        .如果真 (到小写 (到文本 (pe32.szExeFile))  ＝ 到小写 (进程名))
            count ＝ count ＋ 1
            加入成员 (进程ID数组, pe32.th32ProcessID)
        .如果真结束
    .循环判断尾 (Process32Next (hSnap, pe32))
.如果真结束

CloseHandle (hSnap)
返回 (count)