复制图片的一部分
? // 復制圖片的一部分?
procedure TForm1.Button1Click(Sender: TObject);
var
??Bitmap: TBitmap;
??MyRect: TRect;
begin
??MyRect := Rect(10,10,100,100);//定義復制范圍
??Bitmap := TBitmap.Create; //生成Bitmap對象
??Bitmap.LoadFromFile('1.bmp');
??Form1.Canvas.BrushCopy(MyRect, Bitmap, MyRect, clBlack);
??//將圖片復制到窗體中
??Bitmap.Free;
end; 來自為知筆記(Wiz)
轉載于:https://www.cnblogs.com/xe2011/p/3876023.html
總結
- 上一篇: 三维bfs
- 下一篇: “愁苦辛勤憔悴尽”下一句是什么