BGRABitmap图像操作1:最简单的例子,在窗体上画一个长方体
2016-08-31 14:25
423 查看
http://wiki.lazarus.freepascal.org/BGRABitmap_tutorial_1
bgrabitmap是一套用来修改和创建图像的单元,可以使用alpha通道,直接像素访问,快速图像处理。经过在Windows、Ubuntu和Mac OS X环境下测试,(最后一个版本不能在Mac工作)。
第一个例子,在窗体上画一个黄色长方形:
代码:
bgrabitmap是一套用来修改和创建图像的单元,可以使用alpha通道,直接像素访问,快速图像处理。经过在Windows、Ubuntu和Mac OS X环境下测试,(最后一个版本不能在Mac工作)。
第一个例子,在窗体上画一个黄色长方形:
代码:
unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, BGRABitmap, BGRABitmapTypes; type { TForm1 } TForm1 = class(TForm) procedure FormPaint(Sender: TObject); private { private declarations } public { public declarations } end; var Form1: TForm1; implementation {$R *.lfm} { TForm1 } procedure TForm1.FormPaint(Sender: TObject); var bmp: TBGRABitmap; begin bmp := TBGRABitmap.Create(ClientWidth, ClientHeight, BGRABlack); bmp.FillRect(20, 20, 100, 40, BGRA(255,192,0), dmSet); //fill an orange rectangle bmp.Draw(Canvas, 0, 0, True); //render BGRABitmap on the form bmp.Free; //free memory end; end.
相关文章推荐
- [Qt]一个简单的Qt Widget多线程处理图像的例子
- Python操作json数据的一个简单例子
- 一个简单的NoSQL内存数据库—Berkeley DB基本操作的例子
- TensorFlow自带例子已经包含了android和ios下的摄像头图像分类示例Inception v1,这里补充一个Windows下的,使用AForge库(www.aforgenet.com)操作
- jxls操作Excel表的导出,一个简单的例子
- 关于:读写xls文件,提供下载的一个小例子(jxl 的简单运用) - 高级操作
- 一个简单的MyBatis完成插入操作的例子(二)
- BGRABitmap图像操作3:用鼠标在窗体画连续的曲线
- BGRABitmap图像操作13:前一个例子,更改canvas为CanvasBGRA
- Delphi实现窗体总是向前操作,Delphi拖拽的一个例子
- 一个简单的NoSQL内存数据库—Berkeley DB基本操作的例子
- 一个POI操作Excel简单例子
- Python操作json数据的一个简单例子
- 一个简单的MyBatis完成插入操作的例子(一)
- 【转载】关于:读写xls文件,提供下载的一个小例子(jxl 的简单运用) - 高级操作
- linux 下文件操作和内存映射的一个简单例子
- BGRABitmap图像操作13:标准坐标系统下像素级别例子
- 一个Lua脚本操作Redis的简单例子
- Struts 教程I:一个用jbuilder X 做的最简单的helloworld的struts例子
- 一个简单的Struts例子