FindCenterColor 中心找色 |
|
范围中心找色(不支持win2000以下系统) |
|
参数1 整数型,窗口句柄
参数2 整数型,窗口左上角X坐标 参数3 整数型,窗口左上角Y坐标 参数4 整数型,窗口右下角X坐标 参数5 整数型,窗口右下角Y坐标 参数6 字符串型,16进制颜色值 |
|
字符串型,颜色位置坐标 |
|
//下面这句按从中间到四周的顺序查找窗口句柄(变量:Hwnd)窗口的指定的矩形区域内指定颜色 XY = Plugin.Bkgnd.FindCenterColor(Hwnd, 0, 0, 20, 20, "FFFFFF") //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串 dim MyArray MyArray = Split(XY, "|") //下面这句将字符串转换成数值 X = Clng(MyArray(0)): Y = Clng(MyArray(1)) Msgbox "后台窗口颜色X坐标="& X & " Y坐标=" & Y |
|
|
//下面这句按从中间到四周的顺序查找窗口句柄(变量:Hwnd)窗口的指定的矩形区域内指定颜色 Plugin XY = Bkgnd.FindCenterColor(Hwnd, 0, 0, 20, 20, "FFFFFF") //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串 MyArray = Split(XY, "|") //下面这句将字符串转换成数值 X = Clng(MyArray(0)): Y = Clng(MyArray(1)) Msgbox "后台窗口颜色X坐标="& X & " Y坐标=" & Y |