如何屏蔽图片中某一区域

Question

设备会把一张图片发给我，并且会发送两个坐标点给我，一个矩形的左上角和右下角的坐标，我要根据这两个坐标值把这一区域内的屏蔽掉，可以把这一区域弄成黑色底的，这该如何实现呢

Answer 1

把Self.Canvas换成你的画图设备的Canvas就行了
procedure TForm1.DrawRect(p1, p2: TPoint);
begin
  Self.Canvas.Brush.Style := bsSolid;
  Self.Canvas.Brush.Color := clBlack;
  Self.Canvas.FillRect(Rect(p1.X,p1.Y,p2.X,p2.Y));
end;