摘要： var canvas: TCanvas; bmp:TBitmap; dwh:hWnd; dwd:HDC; begin dwh:=GetDesktopWindow; dwd:=GetWindowDC(dwh); canvas:=TCanvas.Create; try canvas.Handle:=dwd; bmp:=TBitmap.Create; try bmp.Width ... 阅读全文