按键精灵后台找图

Posted 2022-10-07 安果移不动

    //检查是否运行软件 如果有的话 那么关闭
    
    Hwnd = Plugin.Window.Find("xxx", 0)
    If Hwnd > 0 Then 
   
    
        BMPArray= Plugin.BGCP2_02.LoadBMP("c:\\t.bmp")
        If IsArray(BMPArray)=False
            MsgBox "载入图片失败",4096
            EndScript
        Else 
        
            HwndEx = Plugin.Window.FindEx(Hwnd, 0, "WindowsForms10.BUTTON.app.0.2cf60f9_r6_ad1", "停止")
            TracePrint HwndEx 
            If HwndEx > 0 Then 
                Call Plugin.BGCP2_02.FindPicture(HwndEx, 0, 0, 75, 27, "c:\\t.bmp", 10, 0.9, x, y)
        
                If x >= 0 And y >= 0 Then 
                    TracePrint x&","&y
                    Call Plugin.Bkgnd.LeftClick(HwndEx, x, y)
                    TracePrint "点击了关闭按钮"
                    Delay 3000
                Else 
                    TracePrint "没开？"
            
          
                End If
            End If
            
            
            Plugin.BGCP2_02.FreeBMP BMPArray

        End If
      //  Call Plugin.Window.CloseEx(Hwnd)
        Delay 2000
    End If

用到了第三方插件

BGCP2_02

需要下载后导入按键安装的plugin里面才可以正常使用