Autoit中用PrintWindow替代ScreenCapture函数实现截图

想截取躲在后面的窗体或控件,找到了PrintWindow函数,幸运的是Autoit3也对此进行了封装以方便使用。

于是乎,将帮助文件里的_WinAPI_PrintWindow()实例改写了一下,以替代ScreenCapture系列函数:

#include <WinAPIGdi.au3>
#include <Clipboard.au3>

HotKeySet("q", "exam")

While 1
    Sleep(100)
WEnd

Func exam()
    Run(@SystemDir & '\calc.exe')
    Local $hWnd = WinGetHandle("[CLASS:CalcFrame]")
    If Not $hWnd Then
        Exit
    EndIf
    PrintModule($hWnd)
EndFunc   ;==>exam

Func PrintModule($hWnd)
    Local $iSize=ControlGetPos("","",$hWnd)
    ; Create bitmap
    Local $hDC = _WinAPI_GetDC($hWnd)
    Local $hDestDC = _WinAPI_CreateCompatibleDC($hDC)
    Local $hBitmap = _WinAPI_CreateCompatibleBitmap($hDC, $iSize[2], $iSize[3])
    Local $hDestSv = _WinAPI_SelectObject($hDestDC, $hBitmap)

    _WinAPI_PrintWindow($hWnd, $hDestDC)

    _WinAPI_ReleaseDC($hWnd, $hDC)
    _WinAPI_DeleteDC($hDestDC)

    _ClipBoard_Open(0)
    _ClipBoard_Empty()
    _ClipBoard_SetDataEx($hBitmap, $CF_BITMAP)
    _ClipBoard_Close()

    _WinAPI_DeleteObject($hBitmap)
EndFunc   ;==>PrintModule

示例中的$hWnd不限于窗口句柄,有点Autoit编程经验的应该都了解。

如果想进一步截取某个窗体或控件的某一部分区域,加个GDIPlus函数将获取到的Bitmap克隆一下就可以了。

Au3这种脚本语言学习起来主要还是靠耐心钻研帮助文件,毕竟东西就那么多。

如有其它疑问或建议,欢迎在这方面志同道合的朋友加我微信(Z,E,,A,,,L,,S,K)交流 ^^

 

posted @ 2016-12-31 17:38  Jiushiliu  阅读(3294)  评论(0编辑  收藏  举报