我是用下面的代码来截windows活动窗口的图的,程序运行时最小化,用系统热键消息激活以下代码..Private Sub Command1_Click()
Dim lddc As Long
Dim ldhwnd As Long
Dim rectSrcW As RECT
Dim lw As Long, lh As Longldhwnd = GetForegroundWindow()lddc = GetWindowDC(ldhwnd)
GetWindowRect ldhwnd, rectSrcWMe.Picture1.ScaleMode = 3 'pixel
lw = rectSrcW.Right - rectSrcW.Left
Me.Picture1.Width = lw
lh = rectSrcW.Bottom - rectSrcW.Top
Me.Picture1.Height = lhBitBlt Form1.Picture1.hdc, 0, 0, lw, lh, lddc, 0, 0, SRCCOPY
SavePicture Form1.Picture1.Image, "c:\" + getDT + "a.bmp"Form1.Picture1.ClsEnd Sub
这么写,在截windows media player的时候,得到是黑的窗口,虽然在播放东西,却还是什么都截不到.但windows的PrintScreen键却可以截到...求教,怎么能截到Windows media player窗口的图??谢谢~