Question

我试图截取屏幕特定部分的屏幕截图。这是我想要剪切的屏幕部分的坐标＆＃39; ：

左：442 上：440 右：792 下图：520

即，宽度为350px，高度为80px的矩形。但我不知道如何使用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;

Answer 1

你在这里做的是复制整个屏幕并在你的新位图中以坐标Rect(442,440,792,520);绘制它......这不在它的画布上。

坐标Rect(442,440,792,520)对应于您要从源位图获取的部分。你想复制它＆＃34;里面＆＃34;您的新位图，因此在rect Rect(0,0,350,80)

中

您可以像这样调整矩形：

 rect_source := Rect(442,440,792,520);
 rect_destination := Rect(0,0,350,80);

其余代码似乎都是正确的。

截取屏幕特定部分的屏幕截图

1 个答案: