关闭指定进程内指定类型的句柄，例如互斥体Mutant.

cylhb

直接放DLL，插件接口 cy.plugin只有2个函数
CloseHandleByType(进程PID,句柄类型)
CloseHandleByName(进程PID,句柄名)
返回1代表成功

var cy=com("cy.plugin")


        如果(cy.CloseHandleByType(进程PID,句柄类型)==1)
            返回 真
        如果结束

        如果(cy.CloseHandleByName(进程PID,句柄名)==1)
            返回 真

        如果结束







进程PID怎么获取相信不用多说了，大家都知道
至于要关闭的类型名？不知道的情况下可以先用XT查查看咯。。这个我也不懂，都是找度娘来的

刚试了一下LOLBOX，测试关闭类型名--Mutant,成功实现多开。。当然，其他的没测试，也不知道可以不可以，需要的朋友可以自己拿去试试！
不保证有效，无效可别找我啊哈哈

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

黑影小波

功能 开始_点击()
    变量 长度,是否成功,PID数组
    是否成功=辅助.注册插件("rc:cy.dll",真)
    var cy=com("cy.plugin")
    PID数组=进程.信息("Game.dat")
    数组空间.大小(PID数组,长度)
    遍历(i=0;i<长度;i++)
        traceprint(PID数组[i])
        cy.CloseHandleByType(PID数组[i],"Mutant")
    遍历结束
功能结束

单个运行可以关闭 一用遍历就不行了  怎么破。。。

cylhb

唯一小哥 发表于 2014-2-17 21:17
比如这个互斥体
句柄类型：Mutant句柄名：\BaseNamedObjects\XEROMUTEX_FIRST
句柄：0x00000224

因为我写的时候是按类型名来判断的，所以你这个写句柄名肯定是没效果的
如果需要按句柄名的话我得修改才行。毕竟不是自己用，考虑的比较少。。

至于TC出现不正确的转义字符格式那是你基本语法的问题。反斜杠\在TC编译环境需要写成双反斜杆\\.

我用的是VB写的插件，只是把插件放到TLL方便调用而已。。

君凌天下

vb 好好

zc317414

学习一下！！！

heeman

这么好用的东西，，我现在才发现

ulcel800

a735311619

多谢大神

唯一小哥

顶楼主啦..希望楼主多发精品好帖啦.....

i8786638521

看看再说

唯一小哥

Cy.关闭句柄(PID,"Mutant")

执行这句后EXE自动关闭，怎么回事。window7--64位
问题签名:
  问题事件名称:        APPCRASH
  应用程序名:        互斥体.exe
  应用程序版本:        1.0.0.0
  应用程序时间戳:        52d4bb54
  故障模块名称:        StackHash_60bb
  故障模块版本:        6.1.7601.18229
  故障模块时间戳:        51fb1072
  异常代码:        c0000374
  异常偏移:        000ce753
  OS 版本:        6.1.7601.2.1.0.256.1
  区域设置 ID:        2052
  其他信息 1:        60bb
  其他信息 2:        60bb1f9a6d7ba43d778ec3358088ec27
  其他信息 3:        0de5
  其他信息 4:        0de5f30eb815e11d256abdc2291bbd17

唯一小哥

唯一小哥 发表于 2014-2-17 16:44
Cy.关闭句柄(PID,"Mutant")

执行这句后EXE自动关闭，怎么回事。window7--64位

是执行有效果后 关闭。PID为空时不会关闭。

令，亲，有时候 互斥体的句柄类型不一定是Mutant，可能是其他。
但又不能全部关闭掉。
希望前辈亲指点，把句柄类型 换成句柄名 或者 句柄。