D
dangde
Unregistered / Unconfirmed
GUEST, unregistred user!
Mybmp := Tbitmap.Create;<br> Mycan := TCanvas.Create; //屏幕截取<br> dc := GetwindowDC(0);<br> try<br> Mycan.Handle := dc;<br> cx := GetSystemMetrics(SM_CXSCREEN);<br> cy := GetSystemMetrics(SM_CYSCREEN);<br> R := Rect(0, 0, cx, cy);<br> Mybmp.Width := R.Right;<br> Mybmp.Height := R.Bottom;<br> Mybmp.PixelFormat := FPixFmt;<br> //BitBlt(Mybmp.Canvas.Handle, 0, 0, cx, cy, Mycan.Handle, 0, 0, SRCCOPY);<br> Mybmp.Canvas.CopyRect(R, Mycan, R);<br> finally<br> releaseDC(0, DC);<br> end;<br> Mycan.Handle := 0;<br> Mycan.Free;<br><br>这是一段抓屏代码, 在普通模式下工作的蛮正常的, 但是我现在要做成服务程序,在服务模式下, 抓出来的是一幅空白的位图。 哪位大侠知道服务程序模式下的抓图方法 ??