Delphi 从PaintBox拷贝一部分内容到TBitmap

本文整理自网络，侵删。

 将指定的TPaintBox内容（假如为paintbox1）拷贝到一个TBitmap（如Bitmap），可以这么做

Bitmap.Width := PaintBox1.Width;
Bitmap.Height := PaintBox1.Height;
BitBlt(Bitmap.Canvas.Handle,
  0,
  0,
  Bitmap.Width,
  Bitmap.Height,
  PaintBox1.Canvas.Handle,
  0,
  0,
  SRCCOPY);

 

相关阅读 >>

Delphi的获取某坐标的颜色值

Delphi xe ioutils tpath(结构体) 的方法与属性

Delphi 实现打开文件定位

Delphi程序运行在64位机器连接odbc的问题

Delphi 免杀下载者源代码

Delphi stringtobase64、base64tostring两个函数

Delphi 获取系统日期时间

Delphi xe8 无法进入android的调试状态

Delphi 谷歌api文本转换语音mp3文件

Delphi 操作键盘按下和释放操作

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 从PaintBox拷贝一部分内容到TBitmap