窗口后臺基礎操作綜合教程

本適用于對按鍵精靈略有一點基礎的朋友們學習，但是0基礎的不太適合（基本的鍵盤鼠標都不會。按鍵自帶的窗口插件這個是地址 361這個是地址 窗口句柄：在Windows中，句柄是一個系統(tǒng)內(nèi)部數(shù)據(jù)結(jié)構(gòu)的窗口類名：windows程序窗口時內(nèi)部用于標識該窗口特性的名字。CallRunApp("notepad.exe")Delay1500//0Hwnd=Plugin.Window.Find(0,"無標題-記事本")TracePrintHwndPlugin.Window.FindEx(Hwnd,0,Edit0)MsgBox"查找到的子窗口句柄為："&HwndMsgBox"查找到符合的窗口句柄為："&HwndExdimMyArray=Split(HwndEx,IfUBound(MyArray)>=0ThenForMsgbox"&i+1&"個窗口句柄為："&Clng(MyArray(i))EndIfdoWhiletruekey=WaitKey()TracePrintkeyIfkey=118Hwnd=Plugin.Window.MousePoint()TracePrintHwndExitDoEndIfDelay20Delay20MsgBox本節(jié)計劃在VIP中講述，但是考慮到大多朋友對按鍵技術(shù)的強烈，所以就放到了基礎免費的doWhiletruekey=WaitKey()TracePrintkeyIfkey=118TracePrintHwndExitDoEndIfDelay20Delay20i=h_s=split(hwndex,"|")h_u=UBound(h_s)Forhwnd=h_s(i)Delay100"第一節(jié)、（如，循環(huán)、for等命令）setdm=doWhiletruekey=WaitKey()TracePrintkeyIfkey=118hwnd=dm.GetMousePointWindow()TracePrintHwndExitDoEndIfDelay20Delay20MsgBoxh_s=split(hwnds,",")h_u=UBound(h_s)Forhwnd=h_s(i)MsgBoxhwndi=i+1第二節(jié)、如何在單內(nèi)操作多窗口基礎的制作分析（VIP會員本節(jié)課程大漠的大漠的這個寫的非常嚴謹不過還是有很多朋友沒辦法與窗口句柄來銜接，setdm=hwndsdm.EnumWindow(0,"鹿鼎記h_s=split(hwnds,Dimdm_all(),m,hwnd_all()h_u=UBound(h_s)+1TracePrinth_uRedimdm_all(h_u),hwnd_all(h_u)ForSetdm_all(m)=createobject("dm.dmsoft")hwnd_all(m)=h_s(m)m=m+Setdm=nothinghwnd_all(m)=Fori0ToUBound(h_s)Call切換對像(i)dm_ret=dm.SetWindowState(hwnd,dm_ret=Fori=0ToUBound(h_s)Call切換對像(i)dm.SetPath"e:\jzy"

Fori=0To//CallSub切換對像Setdm=dm_all(index)EndSubOnScriptExit()Fori=0To2Call切換對象dm_ret=EndSub第三節(jié)、如何在單內(nèi)操作多窗口全測試（VIP會員本節(jié)以鹿鼎記或3為例詳細的講解Setdm=hwnds=dm.EnumWindow(0,"","",1+4+8+16)h_s=split(hwnds,",")Dimdm_all(),m,hwnd_all()h_u=UBound(h_s)+1TracePrinth_uRedimdm_all(h_u),hwnd_all(h_u)m=0x=-10:y=0:k=1ForSetdm_all(m)=createobject("dm.dmsoft")hwnd_all(m)=h_s(m)m=m+Setdm=nothinghwnd_all(m)=Fori0ToUBound(h_s)Call切換對像(i)//dm_ret=dm.SetWindowState(hwnd,12)Delay50//dm.MoveWindowhwnd,x,yDelay50dm_ret=dm.BindWindow(hwnd,"gdi","dx","dx",Delay100Fori=0ToUBound(h_s)Call切換對像(i)dm.SetPath"e:\jzy"Fori0ToUBound(h_s)Call切換對像(i)/*Delay//dm_ret=dm.Capture(0,0,1024,768,"第"&k&"個窗口截圖"&////s=dm.Ocr(59,3,251,58,"ded784-//MessageBoxdm.MoveTo474,581Delay100Delay200dm.KeyDowndm.KeyPressdm.KeyUpSub切換對像S