关于窗口保存为图片的问题

[xgpgood]

窗口没有在最顶层,但也没有最小化,如何将其保存为图片?

[myjisgreat]

Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long



Me.Cls
BitBlt Me.hDC, 0, 0, me.Width, me.Height, GetDC(me.hwnd), 0, 0, vbSrcCopy
Me.Picture = Me.Image
SavePicture me.Picture, "c:\1.bmp"


'貌似用getclientdc更好

[东方之珠]

要将窗口上的标签、控件一起保存为图片的话，参考下面这个：
http://topic.csdn.net/u/20080331/19/6c605dcc-2f22-4de7-a7f2-c6c122a615f7.html?1759399285