DelphiXe3 FireMonkey 如何画图

DelphiXe3 FireMonkey  如何画图

         在Delphi的老版本中，我们使用TCanvas画布类来实现画图操作，如画线、画圆、画矩形等。在DelphiXe3中的FireMonkey，HD以及3D应用程序中，如何通过自己编写代码来实现画图操作呢。

 

      先来一睹为快

 

画布类TCanvas

画布类是FMX.Types.TCanvas，这是一个抽象类，不能直接实例化而使用。所以在上面的演示程序中，我们使用了TImage类，我们在TImage.Bitmap.Canvas这个画布上实现了画图操作。

 

1.TCanvas提供了如下画图方法

FMX.Types.TCanvas.DrawBitmap   画位图

FMX.Types.TCanvas.DrawArc       画弧形

FMX.Types.TCanvas.DrawEllipse    画椭圆

FMX.Types.TCanvas.DrawLine       画线

FMX.Types.TCanvas.DrawPath       画路径

FMX.Types.TCanvas.DrawPolygon    画多边形

FMX.Types.TCanvas.DrawRectSides 画矩形区域

 

2.TCanvas的禁制刷新方法

FMX.Types.TCanvas.BeginScene

FMX.Types.TCanvas.EndScene

这个类似于Delphi早期版本中的BeginUpdate,EndUpdate

 

3.画笔画刷

 

画布使用的画笔画刷对象是FMX.Types.TCanvas.Stroke，它是类FMX.Types.TStrokeBrush，他提供了一些属性来改变图形的表现形式。

 

4.画笔的宽度

 FMX.Types.TStrokeBrush.Thickness

 

 

效果如下图

 

5.画笔的线形

FMX.Types.TStrokeBrush.Dash 

取值如下：

TStrokeDash = (sdSolid,sdDash, sdDot, sdDashDot, sdDashDotDot, sdCustom);

 

具体含义：

sdSolid	实线.
sdDash	虚线.
sdDot	点线.
sdDashDot	点划线.
sdDashDotDot	点点划线.
sdCustom	自定义线性.

 

效果如下图

 

6.线端点现状

FMX.Types.TStrokeBrush.Cap

 

取值如下：

TStrokeCap = (scFlat, scRound);

 

具体含义：

scFlat	线端点是方形.
scRound	线端点是圆形.

 

效果如下图：

 

7.线连接形式

FMX.Types.TStrokeBrush.Join

 

取值如下：

TStrokeJoin = (sjMiter, sjRound, sjBevel);

 

具体含义：

sjMiter	斜接.
sjRound	圆接.
sjBevel	坡接.

 

效果如下图：