DELPHICanvas的属性大全.doc

在写画图软件必然少不了 canvas，可是像我们这样的刚步入程序开发的人们，哪有都懂的，只做一
点学一点了。下面是 Canvas 的相关属性。

在 Delphi 中，专门定义了一组用于绘制图形的对象和组件，完成一些简单的图像功能。利用这
些对象、组件的方法，可以方便地绘制各种常用图形；通过设置它们的属性，能得到不同风格的图形。
另外，通过对鼠标事件的定义，可以方便设计图形绘制程序。

（1）TCanvas，TPen，TBrush，TColor 对象的方法及属性；

（2）绘图功能的实现；

（3）TImage，TPicture，TBitBtn，TBitmap 组件的方法及属性；

（4）图像观测及处理。4.4.1 TCanvas——画布对象

TCanvas 对象是一个用于绘图的组件，Delphi 利用这个组件为用户提供了一个绘制图形的区
域，在这个区域上，程序可实现各种绘图功能，很多组件（如 TImage、TMemo）的 Canvas 属性
就是 TCanvas 对象。在组件上绘制图形就是在组件的画布上绘制。TCanvas 的 Brush、Pen、Font 属性分别是 TBrush、TPen、TFont 对象，它们用于定义绘制图形的风格。关于 TBrush、TPen 对
象，后面将详细介绍。

需要说明的是， Delphi 中利用前缀 T 来标志内部定义的对象， 如 TPen 代表画笔对象，
例 TForm
则代表窗体对象等。

画布的笔的位置定义在 PenPos 属性中，可用 MoveTo 方法来移动笔。如果要在画布上输出文
本，可用 Textout 方法。

TCanvas 对象有很多方法，可完成常用的绘图功能。

TCanvas 对象的方法

方法

Arc

Chord

Brushco


说明

Arc(x1,y1,x2,y2,x3,y3,x4,y4 : Integer);

Arc 方法在椭圆上画一段弧，椭圆由(x1,y1)、(x2,y2) 两点所确定的
椭圆决定。弧的起点是椭圆圆周和椭圆中心与(x3,y3)连线的交点。弧矩形
终点是椭圆圆周和椭圆中心与(x4,y4)连线的交点以逆时针方向画弧

Chord(x1,y1,x2,yx,x3,y3,x4,y4 : Integer);

Chord 方法连接椭圆上两点，椭圆由(x1,y1)、(x2,y3) 两点所确定
的矩形决定，(x3,y3)是始点，(x4,y4)是终点

Brushcopy(const Dest : TRect;Bitmap : TBitmap;

py
const Source TRect;Color : TColor);

Brushcopy 方法把位图的一部分复制到画布的某个矩形区域，并用画
笔的当前颜色替换位图的颜色。参数 Dest 定义画布的一个矩形区域，该矩

形用以填充位图，Bitmap 定义位图；Source 定义位图中的矩形区域，该区
域上的位图将被复制；Color 定义画笔中用以替换位图的颜色

CopyRec CopyRect(Dest:TRect;Canvas:TCanvas; Source TRect);
t
此方法从另一个画布对象上复制部分图像到该画布。Canvas 表示源画
布，Source 是源画布上要复制的图像区域。Dest 表示目标画布上将接受复
制图像的矩形区域

方法 说明

Draw Draw(x,y : Integer;Graphic : TGraphic);

此方法在画布给定的像素点坐标(x,y)处画 Graphic 所给的图像，该
图像可以是位图、图标或元位图

Ellips Ellips(x1,y1,x2,y2 : Integer);

Ellips 方法在画布指定的矩形边界上画一个椭圆，(x1,y1)是矩形左
上角的像素坐标，(x2,y2)是矩形右下角的像素坐标。如果矩形形成一个区
域，则将出现一个椭圆

LineTo LineTo(x,y : Integer);

LineTo 从当前位置画一条线至(x,y)所指定的位置，并把笔的位置移
至(x ,y)

MoveTo MoveTo(x,y : Integer);

MoveTo 将笔的当前位置设置到点(x,y)处， 笔的当前位置在 PenPos
属性中，改变笔的当前位置使用 MoveTo 方法，不要设法改变 PenPos 的
值

Die

Polygon


Die(x1,y1,x2,y2,x3,y3,x4,y4 : Longint);

Die 方法绘制椭圆的一部分，椭圆由点(x1,y1),(x2,y2)所确定的矩
形所决定，绘制的那部分由椭圆中心到(x3,y3)、(x4,y4)两点的两条辐射
线所决定

Polygon(Points : array of TPrint);

Polygon 方法在画布上绘制一系列的点，各点依次连成线，最后将首
尾两点相接形成一个区域，并用当前笔刷填充此区域

Polyline Polyline(Ports : array of TPort);

Polyline 方法在画布上用当前画笔绘制一系列的点，各点依次连成线

StretchDr StretchDraw(Const Rect : TRcct : Graphic : TGraphic);
aw
此方法在 Rect 参数指定的矩形内画一图像。图像延伸，改变大小以

Rectangle

DrawFocu
适应矩形

Rectangle(X1,y1,x2,y2 : Integer);

Rectangle 方法在画布上用当前画刷绘制矩形，(x1,y1)是矩形的左
上角，(x2,y2)是矩形的右下角

DrawFocusRect(Const Rect : TRect);

sRect
此方法绘制一矩形以指示此矩形获得焦点。此方法是 XOR（异或）函
数， 第二次调用时原有矩形将消失。 DrawFocusRect 绘制的矩形不能滚动。
要实现滚动功能则先调用此方法使矩形消失，待滚动过后重新绘制

TPen——画笔对象

应用程序常用 TPen 对象在画布上绘制各种线段，笔的颜色在 Color 属性中定义。线段宽度在
Width 属性中定义。
1. Style 属性

Style 属性定义了线段的各种类型，见表 4.3。

表 4.3 Style 属性的取值及含义

Style 属性

PsSolid

PsDash

PsDot

PsDashDot

PsDashDotDot

PsClear

PsInsideFrame


含义

画固定线段

画由虚线组成的线段

画由点组成的线段

画点划线

画双点划线

画看不见的线段

画边界的矩形线框