测试代码,按键的语法,基本上你也看得懂
- 比如颜色,我们可以如下测试,其中的gdi模式你可以换成别的颜色模式,看哪种模式可以正常的后台截图,那么这个模式就是你的后台模式
- 截的到图我是放在了c:根目录(根据dm.SetPath指定的目录)
- set dm = createobject("dm.dmsoft")
- dm.SetPath "c:"
- hwnd = dm.GetMousePointWindow()
- dm_ret = dm.BindWindow(hwnd,"gdi","normal","normal",0)
- dm_ret = dm.Capture(0,0,2000,2000,"screen.bmp")
- dm_ret = dm.UnBindWindow()
- 比如鼠标,其中的windows你可以换成其它模式,测试鼠标要注意,坐标点(100,100)要换成窗口里有意义的点,比如某个按钮等.
- set dm = createobject("dm.dmsoft")
- hwnd = dm.GetMousePointWindow()
- dm_ret = dm.BindWindow(hwnd,"normal","windows","normal",0)
- dm.MoveTo 100,100
- Delay 100
- dm.LeftClick
- Delay 100
- dm_ret = dm.UnBindWindow()
-
- 比如键盘,其中的windows你可以换成其它模式.注意下面的按下的虚拟键盘码68要根据窗口换成有意义的按键.
- set dm = createobject("dm.dmsoft")
- hwnd = dm.GetMousePointWindow()
- dm_ret = dm.BindWindow(hwnd,"normal","normal","windows",0)
- dm.KeyPress 68
- Delay 100
- dm_ret = dm.UnBindWindow()
复制代码 |