Delphi图形图像编程(一)

2008-02-23 07:15:57来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

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

  本章将介绍以下内容:

  1. TCanvas,TPen,TBrush,TColor对象的方法及属性;

  2. 绘图功能的实现;

  3. TImage,TPicture,TBitBtn,TBitmap部件的方法及属性;

  4. 图像观测及处理。

  Graphex.dpr是一个简单的图形图像应用程序,是对以上这些对象和组件的具体应用。本章将结合此程序进行讲述。  

5.1 图形对象概述 

5.1.1 TCanvas Object(画布对象)

  TCanvas对象是一个用于绘图的表面,在这个区域上,程序可实现各种绘图功能,很多部件(TIMage,TMemo)Canvas属性就是TCanvas对象。在部件上绘制图形就是在部件的画布上绘制。TCanvasBrush,Pen,Font属性分别是TBrush,TPen,TFont对象,它们用于定义绘制图形的风格。关于TBrush,TPen对象,下节中将详细介绍。

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

  TCanvas有对象很多方法,可完成常用的绘图功能,现将方法及功能简介如表5.1: 

5.1 TCanvas对象的方法

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

方法名称         形式及说明

───────────────────────────────────────

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

Arc方法在椭圆上画一段弧,椭圆由(x1,y1),(x2,y2) 两点所确定的椭圆所决

定。弧的起点是椭圆圆周和椭圆中心与(x3,y3)连线的交点。弧矩形终点是椭

圆圆周和椭圆中心与(x4,y4)连线的交点,以逆时针方向画弧。

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

Chord方法连接椭圆上的两点,椭圆由(x1,y1),(x2,y3) 两点所确定的矩形决

定,(x3,y3)是始点,(x4,y4)是终点。

Brushcopy Brushcopy(const Dest : TRect;Bitmap : TBitmap;const Source TRect;

Color : TColor);

Brushcopy方法把位图的一部分复制到画布的某个矩形区域,并用画笔的当前颜色替换位图的颜色。参数Dest定义画布的一个矩形区域,该矩形用以填充位图,Bitmap定义位图;Source定义位图中的矩形区域,该区域上的位图

      将被复制;Color定义画笔中,用以替换位图的颜色。

CopyRect CopyRect(Dest : TRect;Canvas : TCanvas; Source TRect);

此方法从另一个画布对象上复制部分图像到该画布。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)

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:Delphi 开发数据库应用程序概述(一)

下一篇:Delphi 动态链接库编程(三)