我正在尝试截取屏幕特定部分的屏幕截图。这是我要“剪切”的屏幕部分的坐标：
左：442顶部：440右：792底部：520
也就是说，一个宽度为350像素，高度为80像素的矩形。但是我不知道如何使用CopyRect来完成此任务，相反，我得到的是空白图像。这是我的代码：
function screenshot: boolean;
var
Bild : TBitmap;
c: TCanvas;
rect_source, rect_destination : TRect;
begin
c := TCanvas.Create;
bild := tbitmap.Create;
c.Handle := GetWindowDC(GetDesktopWindow);
try
rect_source := Rect(0, 0, Screen.Width, Screen.Height);
rect_destination := Rect(442,440,792,520);
Bild.Width := 350;
Bild.Height := 80;
Bild.Canvas.CopyRect(rect_destination, c, rect_source);
Bild.savetofile('c:\users\admin\desktop\screen.bmp');
finally
ReleaseDC(0, c.Handle);
Bild.free;
c.Free;
end;
end;
您在这里所做的是复制整个屏幕，并Rect(442,440,792,520);在新位图中的坐标处绘制它。
坐标Rect(442,440,792,520)对应于您要从源位图获取的部分。您想将其复制到新位图的“内部”，因此在矩形内Rect(0,0,350,80)
您可以像这样简单地调整您的矩形：
rect_source := Rect(442,440,792,520);
rect_destination := Rect(0,0,350,80);
您的其余代码似乎正确。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句