按键精灵 -获取窗口句柄

MessageBox "窗口右下角坐标："
get_window_pos

//得到当前最前面的窗口句柄-就是把需要的窗口激活在最前面
Hwnd = Plugin.Window.Foreground() //得到鼠标指向的窗口句柄Hwnd = Plugin.Window.MousePoint() 2种都是可以获取句柄的
MessageBox Hwnd







//获取窗口位置
Function get_window_pos()
    //我是一个函数,被你调用了
    
    //Window插件获取窗口坐标[code]Call RunApp("notepad.exe")
    Delay 1500
    //0表示忽略
    //下面这句是查找窗口类名("Notepad")或者标题(0),返回找到的句柄Hwnd
    Dim Hwnd, str_win
    //Hwnd = Plugin.Window.Find("QQ.exe", 0)
    Hwnd = Plugin.Window.MousePoint()
    //下面这句是得到窗口句柄的客户区大小
    str_win = Plugin.Window.GetClientRect(Hwnd)
    TracePrint "得到窗口句柄的客户区大小为：" & str_win
    //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
    Dim arr_win, win_a, win_b, win_c, win_d
    arr_win = Split(str_win, "|")
    //下面这句将字符串转换成数值
    win_a = Clng(arr_win(0)) : win_b = Clng(arr_win(1))
    win_c = Clng(arr_win(2)) : win_d = Clng(arr_win(3))
    MessageBox "窗口左上角坐标：" & win_a & "," & win_b
    MessageBox "窗口右下角坐标：" & win_c & "," & win_d
        
    
End Function
//定义一个函数,可以在脚本中调用这个函数，支持参数和返回值