获取桌面窗口图象
图老师设计创意栏目是一个分享最好最实用的教程的社区,我们拥有最用心的各种教程,今天就给大家分享获取桌面窗口图象的教程,热爱PS的朋友们快点看过来吧!
参见下例:
步骤1----建立新工程。
步骤2----编写如下代码:
PrivateDeclareFunctionGetDesktopWindowLib"user32"()AsLong
PrivateDeclareFunctionGetDCLib"user32"(ByValhwndAsLong)_
AsLong
PrivateDeclareFunctionBitBltLib"gdi32"_
(ByValhDestDCAsLong,ByValxAsLong,_
ByValyAsLong,ByValnWidthAsLong,_
ByValnHeightAsLong,ByValhSrcDCAsLong,_
ByValxSrcAsLong,ByValySrcAsLong,_
ByValdwRopAsLong)AsLong
PrivateSubForm_Load()
DimlDesktopAsLong
DimlDCAsLong
Form1.AutoRedraw=True
Form1.ScaleMode=1
lDesktop=GetDesktopWindow()
lDC=GetDC(lDesktop)
BitBltMe.hDC,0,0,Screen.Width,Screen.Height,lDC,_
0,0,vbSrcCopy
EndSub
步骤3----编译运行,看看大功告成了吧!->