C++ Builder 第七章图形

最新推荐文章于 2024-06-04 12:29:14 发布

jhui163

最新推荐文章于 2024-06-04 12:29:14 发布

阅读量4.5k

点赞数

文章标签： c++ windows 图形 object api button

本章涵盖了VCL的图形编程的基本知识 .vcl封装了Windows图形设备接口，或GDI。 GDI 的方案可能是一个微妙而危险的进程。塔梅斯这项技术并使其非常容易使用。

在下面的页面中，您将了解到：

The TCanvas object 在画布对象
Painting shapes on the screen 在屏幕上画形状
Working with colors 同色
Working with bitmaps 与位图
Working with metafiles 与图元文件
Drawing fractals 绘图形
Working with fonts 与字体

重要的是要理解基本图形功能这里是从你在第28章，“游戏编程见过的DirectX程序查找先进的工具相距甚远。” 这只是基本的功能需要本标准的Windows程序.然而，在这一章所提供的材料是有用的大多数程序标准的Windows，它的核心是知识，所有的VCL的程序员应该具备的一部分。特别是，它显示了如何VCL的封装和简化的Windows GDI编程。

Graphics.Hpp Graphics.Hpp

在VCL的图形支持的核心是发现Graphics.Hpp。 下列对象中可以找到这个文件：

Object 对象	Description 描述
`TCanvas` `画布`	这是基本的图形对象用于绘制窗体上或其他表面形状。这是周围的GDI的主要包装。
`TBrush` `画刷`	这是用来指定颜色或图案，在中心的填充的形状，如矩形或椭圆形的对象。
`TPen` `画笔`	这是画线所使用的对象，作为矩形或椭圆形的轮廓。
`TPicture`	这是广义的，高层次的VCL包装围绕“如位图，图元文件，图片或图标”。
`TMetaFileCanvas`	这是图元文件绘图表面。
`TMetaFile`	这是围绕一个Windows图元文件的VCL包装。
`TBitmap`	这是围绕位图的VCL包装。
`TIcon` `TIcon`	这是围绕图标的VCL包装。
`TGraphicsObject`	Thi这是`画刷，TFont`基类，和`画笔` 。
`TGraphic`	这是`TMetaFile，TBitmap`基类`，Ticon。`

这些对象的许多探索，在未来几页。特别是，我演示如何使用位图和笔，并显示如何绘制基本几何形状在屏幕上。你也可以看到如何使用位图和图元文件。了解TFont对象后，下一个最重要的图形VCL的对象是画布 。这是周围的Windows GDI或图形设备接口的包装。在GDI是子系统Windows程序员使用油漆图片和实物，其他图形。对Graphics.Hpp中的大部分内容，目的是设法简化的GDI，使其相对容易使用。

另外两个重要的图形，并非源于Graphics.Hpp找到的对象是TImage和TPaintBox。 这两个组件包括在本章。

TColor类型

几乎所有的图形对象使用简单TColor类型。这是建设该系统的整体图形奠定基石之一。

对于大多数实际目的，类型TColor，就是变量内置的Windows类型COLORREF。然而，TColor实际声明如下：

enum TColor {clMin=-0x7fffffff-1, clMax=0x7fffffff};

如果您知道COLORREF类型，你可以看到类似TColor类型。在某种意义上说，TColor类型，不过是一组

预定COLORREF

调色板的Windows系统使您可以定义三种不同的颜色，红色，绿色和蓝色，其中每种颜色有255个不同的色调。这些颜色指定在过去的3个字节字节长的值用来表示一个变量的类型TColor。

这里是什么三原色如下所示：

Canvas->Brush->Color = 0x000000FF; // Red 油画，“刷”颜色= 0x000000FF; / /红色

Canvas->Brush->Color = 0x0000FF00; // Green油画，“刷”颜色= 0x0000FF00; / /绿

Canvas->Brush->Color = 0x00FF0000; // Blue油画，“刷”颜色= 0x00FF0000; / /蓝

"你用这些色彩和这些颜色组合，在从第2章RGBShape计划“，基本事实的C + + Builder的。”

当然，这不是方便要写出这些数字的16进制直接。相反，你可以使用RGB宏：

Canvas->Brush->Color = RGB(255, 0, 0); // Red 油画，“刷”的RGB颜色=（255，0，0）; / /红色

Canvas->Brush->Color = RGB(0, 255, 0); // Green油画，“刷”的RGB颜色=（0，255，0）; / /绿

Canvas->Brush->Color = RGB(0, 0, 255); // Blue油画，“刷”的RGB颜色=（0，0，255）; / /蓝

你当然可以，结合红，绿，蓝，生产各种色调：

RGB(255, 0, 255); // Purple 的RGB（255，0，255）; / /紫

RGB(255, 255, 0); // Yellow的RGB（255，255，0）; / /黄色

RGB(127, 127, 127); // Gray的RGB（127，127，127）; / /灰色

VCL中还提供了可以使用常量来指定常见的颜色系列。clBlack，例如，具有相同的内部编号你会从下面的代码：

COLORREF clBlack = RGB(0, 0, 0); COLORREF clBlack =的RGB（0，0，0）;

下面是一些来自GRAPHICS.HPP声明：

#define clBlack TColor(0)

#define clMaroon TColor(128)

#define clGreen TColor(32768)

#define clOlive TColor(32896)

如果您想与这个系统进行试验，可以在BCB创建一个新的项目，拖放到主窗体的按钮和运行的方法有所改变，看起来像这样：

void __fastcall TForm1::Button1Click(TObject *Sender)

{ （

Canvas->Brush->Color = 0x0000FFFF;

Canvas->Rectangle(0, 0, 200, 200);//画布

} ）

此代码将绘制在主窗体右上角明亮的黄色矩形。尝试改变的刷颜色值0x00FF0000，到RGB（255，0，255），以clBlue，等等。如果你绘制矩形厌了，您可以切换到椭圆形，而不是：

Canvas->Ellipse(0, 0, 200, 200);

我谈到与绘图画布后面的章节中形状多。

在大多数情况下你会选择从颜色属性编辑器提供的大多数组件的颜色。例如，您可以双击一个TForm对象的颜色属性造就TColorDialog。然而，有些时候你需要与TColor类型直接，这就是为什么我有详细解释的主题。

Canvas 画布对象

一切形式的许多组成部分，有一个画布。你能想到的一个帆布被表面上的图形对象可以油漆。总之，这里的开发人员使用的比喻是一个画家的画布。

这画布对象纳入层次结构的核心组件，通过聚合，在许多情况下意味着你可以通过一个对象的领域，例如TForm或TImage.

例如，您可以编写如下：

Form1->Canvas->TextOut(1, 1, "Hello from the canvas");

.本声明中写道从帆布改为“你好”，窗体的左上角。请注意，您没有访问或引用一个设备上下文进行直接使用此方法。

当然，很多时候，你是从Form1 的内部访问Form1的大部分，因此，你可以写

Canvas->TextOut(1, 1, "Hello from the canvas");

但是，你不能写

Form1->TextOut(1, 1, "Hello from the canvas");

这是因为Canvas对象是到 Form1。 画布是通过多重继承带来的汇总。此外，聚合并没有试图对包内的TForm方法画布的每一种方法。 "聚集在讨论19章更详细，“继承”和20，“封装。”

在 Canvas对象有几个关键的方法，所有的VCL的程序员应该知道：

`Arc` `弧`	画弧线
`Chord` `和弦`	一个封闭的数字显示1线和椭圆相交
`CopyRect`	复制一个到另一个地区帆布
`Draw` `绘制`	绘制位图或其他图形画布上
`Ellipse` `椭圆`	绘制椭圆
`FillRect`	填充矩形
`FloodFill`	填写一个封闭的区域
`FrameRect`	Draw a border around a rectangle周围绘制一个矩形边框
`LineTo`	画线
`MoveTo`	画线
`Pie`	画一个饼形对象
`Polygon`	绘制多面对象
`PolyLine`	连接一组点的画布
`Rectangle`	绘制一个矩形
`RoundRect`	Draw a rectangle with rounded corners绘制一个圆角矩形
`StretchDraw`	`绘制`相同，但该对象延伸，以填补区
`TextHeight`	一个在当前字体弦高
`TextOut`	输出文本
`TextRect`	输出文本在某个特定地区的
`TextWidth`	一个在当前字体字符串的宽度

在画布以下属性的对象很重要：

Font 字体

Brush刷

Pen笔

Pixels像素

以下事件可能对一些非常重要的技术程序：

OnChange

OnChanging

如果您知道在Windows API，这些方法中的许多人都会熟悉。从用帆布大可以获得对象而不是原始的Windows GDI调用是使用的资源会为你自动管理。特别是，你永远必须有一个设备上下文，也不必为选择到一个设备上下文对象。

在某些情况下，您将得到更好的性能，如果你直接写入到Windows GDI的。然而，这是一个错误的假设，你将总是得到这样更好。例如，VCL的图形子系统将缓存在一个复杂的方式共享资源，将很难复制在自己的代码。我个人的看法是，你应该使用VCL的图形程序只要有可能，只有转向原始的Windows API当你碰到一个没有被覆盖的VCL图形区域。

该DrawShapes程序演示是多么容易使用的画布在程序中的对象。此应用程序勾划出一个简单的画图程序的有能力来画线，矩形和椭圆轮廓。该程序的屏幕截图见图7.1，以及该程序的源表7.1和7.2出现。

清单7.1为DrawShapes程序头文件中声明了一个枚举类型和几个简单的领域。

/// ///

// Main.cpp / /主程序

// DrawShapes Example / / DrawShapes范例

// / /

#ifndef MainH

#define MainH

#include <vcl/Classes.hpp>

#include <vcl/Controls.hpp>

#include <vcl/StdCtrls.hpp>

#include <vcl/Forms.hpp>

#include <vcl/Menus.hpp>

#include <vcl/ExtCtrls.hpp>

#include <vcl/Buttons.hpp>

#include <vcl/Dialogs.hpp>

enum TCurrentShape {csLine, csRectangle, csEllipse};

class TForm1 : public TForm

{ （

__published:

TMainMenu *MainMenu1; ;

TMenuItem *File1;

TMenuItem *Open1; ;

TMenuItem *Save1;

TMenuItem *N1;

TMenuItem *Rectangle1;

TMenuItem *Shapes1;

TMenuItem *Rectangle2;

TMenuItem *Ellipse1;

TMenuItem *Colors1;

TMenuItem *Brush1;

TMenuItem *Pen1;

TPanel *Panel1;

TSpeedButton *SpeedButton1;

TSpeedButton *SpeedButton2;

TSpeedButton *SpeedButton3;

TSpeedButton *SpeedButton4;

TMenuItem *Lines1;

TColorDialog *ColorDialog1;

TSpeedButton *SpeedButton5;

void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y);

void __fastcall FormMouseUp(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y);

void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift, int X,

int Y);

void __fastcall SpeedButton1Click(TObject *Sender);

void __fastcall Brush1Click(TObject *Sender);

void __fastcall Pen1Click(TObject *Sender);

void __fastcall SpeedButton5Click(TObject *Sender);

private:

TRect FShapeRect;

TColor FPenColor;

TColor FBrushColor;

bool FDrawing;

TCurrentShape FCurrentShape;

int FPenThickness;

void __fastcall DrawShape();

public:

virtual __fastcall TForm1(TComponent* Owner);

}; ）;

extern TForm1 *Form1;

#endif

清单7.2 为DrawShapes计划的主要形式展示了如何在画布上绘制形状。

/// ///

// Main.cpp / /主程序

// DrawShapes Example / / DrawShapes范例

// / /

#include <vcl/vcl.h>

#pragma hdrstop

#include "Main.h"

#pragma resource "*.dfm"

TForm1 *Form1;

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

FDrawing= False;

FCurrentShape = csRectangle;

FBrushColor = clBlue;

FPenColor = clYellow;

FPenThickness = 1;

}

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y)

{

FShapeRect.Left = X;

FShapeRect.Top = Y;

FShapeRect.Right = - 32000;

FDrawing = True;

}

void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y)

{

FDrawing = False;

FShapeRect.Right = X;

FShapeRect.Bottom = Y;

Canvas->Pen->Mode = pmCopy;

DrawShape();

}

void __fastcall TForm1::DrawShape()

{

Canvas->Brush->Color = FBrushColor;

Canvas->Pen->Color = FPenColor;

Canvas->Pen->Width = FPenThickness;

switch (FCurrentShape)

{

case csLine:

Canvas->MoveTo(FShapeRect.Left, FShapeRect.Top);

Canvas->LineTo(FShapeRect.Right, FShapeRect.Bottom);

break;

case csRectangle:

Canvas->Rectangle(FShapeRect.Left, FShapeRect.Top,

FShapeRect.Right, FShapeRect.Bottom);

break;;

case csEllipse:

Canvas->Ellipse(FShapeRect.Left, FShapeRect.Top,

FShapeRect.Right, FShapeRect.Bottom);

break;

default:

;

}

void __fastcall TForm1::FormMouseMove(TObject *Sender,

TShiftState Shift, int X, int Y)

{

if (FDrawing)

{

Canvas->Pen->Mode = pmNotXor;

if (FShapeRect.Right != -32000)

DrawShape();

FShapeRect.Right = X;

FShapeRect.Bottom = Y;

DrawShape();

}

void __fastcall TForm1::SpeedButton1Click(TObject *Sender)

{

FCurrentShape = TCurrentShape(dynamic_cast<TSpeedButton *>(Sender)->Tag);

}

void __fastcall TForm1::Brush1Click(TObject *Sender)

{

ColorDialog1->Color = FBrushColor;

if (ColorDialog1->Execute())

FBrushColor = ColorDialog1->Color;

}

void __fastcall TForm1::Pen1Click(TObject *Sender)

{

ColorDialog1->Color = FPenColor;

if (ColorDialog1->Execute())

FPenColor = ColorDialog1->Color; ;

}

void __fastcall TForm1::SpeedButton5Click(TObject *Sender)

{

FPenThickness = dynamic_cast<TSpeedButton *>(Sender)->Tag;

}

该程序使您能够画线，矩形，并在应用程序的主要形式椭圆形。您可以选择的形状类型您要通过菜单或以速度按钮即可。该计划还允许您设置的形状要绘制并指定宽度和形状周围边框的颜色。

Pens and Brushes 钢笔和刷子

当设置形状的颜色，你需要知道，在一个区域获得形状填充设置为画布当前刷颜色。该行构成了形状的边界是受当前的笔 。

以下是如何设置当前的颜色和笔的宽度：

Canvas->Pen->Color = clBlue;

Canvas->Pen->Width = 5;

如果你想改变刷颜色，您可以编写下面的代码：

Canvas->Brush->Color = clYellow;

我不工作正是在这一程序，但您可以分配不同风格的刷子 ，如以下定义的枚举类型：

TBrushStyle { bsSolid, bsClear, bsHorizontal, bsVertical,

bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross };

默认情况下， 刷子有bsSolid类型。

若要设置一刷子风格，你会编写的代码如下：

Canvas->Brush->Style = bsSolid;

上课也有刷颜色和位图属性。 位图属性可以被设置为一个小的外部位图图像定义为画笔模式。

只有一个的画刷对象，你很可能会使用的方法。这种方法被称为分配 ，这是当你要复制的一刷到另一个特点刷。

所有笔已全部刷类作为相同的属性，但它们添加宽度和模式的财产。属性定义的宽度以像素为单位的笔宽，Mode属性定义的类型 .操作时要使用油漆笔在屏幕上。这些逻辑业务将进一步讨论在短短的几分钟。

Rubber Banding 橡皮

在阅读本节，加快DrawShapes程序和惯例制定椭圆和矩形屏幕上的灭火器，你可以看到如何橡皮技术工程。如果由于某种原因，你不能运行DrawShapes程序，打开Windows画图和借鉴一下，首先从工具菜单中选择相应的图标一些正方形或圆形。观察这些程序的方式创造一个弹性方形或圆形，您可以拖动桌面。这些形状播放你决定什么尺寸和位置为您的几何图形想要的。

这些工具似乎难以程序员创建，但到Windows的API，代码是比较小.以下是主要涉及的步骤，每个解释深入本节后面：

1。当用户点击鼠标左键，DrawShapes“背”的x和y坐标的WM_LBUTTONDOWN事件。

2。当用户拖动与左边的按钮仍下跌了鼠标在屏幕上，DrawShapes绘制一个正方形或圆形每次获得一个WM_MOUSEMOVE消息。就在画每一个新的形状，程序上空格内方形或圆形。新形状的尺寸计算，结合原有的WM_LBUTTONDOWN消息坐标与当前坐标通过在WM_MOUSEMOVE消息。

3。当用户生成WM_LBUTTONUP消息，DrawShapes油漆的颜色和用户指定笔大小的最终形状。

虽然这种描述显然省略了一些重要细节，纲要应在你的脑海中只有几个相对简单，逻辑抚摸形状的算法。事情变得有点复杂的细节时，超过1一个心理转折实在不足，但基本步骤应该是比较清楚的。

（NOTE）注意： 在前面的编号列表，我给的消息的名称，生成的VCL事件。例如，WM_LBUTTONDOWN消息生成一个OnMouseDown事件的WM_MOUSEMOVE消息产生一个onMouseMove事件，等等。我指的是基本的信息，因为这是一个好主意记住之间的VCL事件及其相关的Windows消息的连接。

放大的细节，这里有一个在一个WM_LBUTTONDOWN消息的响应看看：

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y)

{

FShapeRect.Left = X;

FShapeRect.Top = Y;

FShapeRect.Right = - 32000;

FDrawing = True;

}

FormMouseDown保存的位置上鼠标是在首两个月的TRect结构字段点击称为FShapeRect。FShapeRect是作为一个TForm1领域的申报。本人设置TRect结构的权利方面有很大的负数，所以我知道这是第一次，我需要开始跟踪用户的鼠标移动。这是非常必要的，因为第一个形状我提请作为一种特例来处理的需要。

最后一件事，在FormMouseDown方法所做的是建立一个TForm1私有变量FDrawing为 True。这让程序知道用户已经开始绘图操作。

鼠标左键被按下后，该程序拿起一切开始DrawShape飞行一条WM_MOUSEMOVE消息的消息：

void __fastcall TForm1::FormMouseMove(TObject *Sender,

TShiftState Shift, int X, int Y)

{

if (FDrawing)

{

Canvas->Pen->Mode = pmNotXor;

if (FShapeRect.Right != -32000)

DrawShape();

FShapeRect.Right = X;

FShapeRect.Bottom = Y;

DrawShape();

}

该函数的第一行使用的检查，看看几个可能的方法之一，如果鼠标左键下降。如果该按钮不下来，函数忽略此消息。如果它已关闭，该函数获取设备上下文，设置笔氏绘图模式pmNotXor，背的数字目前尺寸，绘制它，并释放设备上下文。

一个画笔对象的模式属性设置方式类似于在BitBLT等方式最后一个参数设置当前绘画模式当前绘图模式。您可以实现通过直接调用Windows API函数调用SetROP2同样的效果。在这种情况下，DrawShape使用逻辑异或和 NOT行动blit的弹性图像的屏幕。这是合乎逻辑的行动选择，因为它描绘的原始图像的顶部的老形状直接，从而有效地清除每个形状：

I如果您异向屏幕广场，广场将显示清楚。
如果您异或相同的形象再次在同一位置，图像就会消失。

这就是在图形模式下简单的逻辑运算的优点。

(NOTE)注意： Aficionados 的图形芯片将注意到，合乎逻辑的行动DrawShapes就业是一个关于异或 （XOR）变异操作。这种变化确保在形状的中心填写要绘制不会抹杀它下面是什么的。微软文档解释了这样的区别：

R2_XOR: final pixel = pen ^ screen pixel

R2_NOTXORPEN : final pixel = ~(pen ^ screen pixel)

此代码测试，看看是否像素是异署属于一支笔。不要浪费太多的逻辑运算令人担忧，它们是如何工作。如果您感兴趣的罚款;如果他们不这样做，没关系。这本书的主题是编程，而不是逻辑。

如果你是工作在Windows API直接，你会与一个常数，而不是所谓的pmNotXor RT_NOTXORPEN。我必须承认，VCL的倾向重新命名的Windows API使用的常量是不是一个很成功的特征。当然，在微软的人谁带着这些标识多了一些值得可怕的，无名的命运，但一旦损害已经造成，可能有简单的坚持使用原来的常量。这样人们就不会记住，是Windows API的使用两套标识符与VCL的使用1，和其他。您不能使用VCL的常量将Windows常数，因为各标识符没有映射到相同的值。

尽管有这些反对意见，我仍然认为这是明智的使用VCL的，而不是直接写入到Windows的API。 VCL的是更安全和更容易使用。从大多数的VCL对象的性能是伟大的，也将是比大多数程序员可以直接写入Windows API中取得更好的许多案件。

请注意，FormMouseMove 调用 DrawShape两次。第一次，它通过在旧的数字，需要擦除的尺寸。这意味着它的S 异或相同的图像直接对原始图像的顶部，从而抹去了。然后FormMouseMove记录了最新的WM_MOUSEMOVE消息的位置并通过这项新的信息DrawShape，其中涂料的新形象在屏幕上。这整个过程重复一遍又一遍（以难以置信的速度），直到用户解除了鼠标左键。

在DrawImage功能， 隐喻首先检查的形状用户选择，然后继续塑造绘制到屏幕上使用当前的笔和填充颜色：

void __fastcall TForm1::DrawShape()

{

Canvas->Brush->Color = FBrushColor;

Canvas->Brush->Style = bsSolid;

Canvas->Pen->Color = FPenColor;

Canvas->Pen->Width = FPenThickness;

switch (FCurrentShape)

{

case csLine:

Canvas->MoveTo(FShapeRect.Left, FShapeRect.Top);

Canvas->LineTo(FShapeRect.Right, FShapeRect.Bottom);