文档章节

Direct2D (11) : 画刷之 ID2D1LinearGradientBrush

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 459
阅读 12
收藏 0

TDirect2DCanvas.Brush 的类型是 TDirect2DBrush,它和 GDI 的 TBrush 的区别主要有两点:
1、只保留了 TBrush.Style 中的 bsSolid、bsClear 选项,弃用了:bsHorizontal、bsVertical、bsFDiagonal、bsBDiagonal、bsCross、bsDiagCross。
2、其 Handle 属性是 Direct2D 中的 ID2D1Brush。

Direct2D 提供有四种画刷:
ID2D1SolidColorBrush     //纯色画刷;TDirect2DBrush 默认使用了它
ID2D1LinearGradientBrush //线性渐变画刷
ID2D1RadialGradientBrush //放射渐变画刷
ID2D1BitmapBrush         //位图画刷

ID2D1Brush //是它们的父接口,它提供了透明色和 2D 变换的基础能力。

{相关方法}
TDirect2DCanvas.RenderTarget.CreateSolidColorBrush();     //建立纯色画刷
TDirect2DCanvas.RenderTarget.CreateLinearGradientBrush(); //建立线性渐变画刷
TDirect2DCanvas.RenderTarget.CreateRadialGradientBrush(); //建立放射渐变画刷
TDirect2DCanvas.RenderTarget.CreateBitmapBrush();         //建立位图画刷

TDirect2DCanvas.RenderTarget.CreateGradientStopCollection(); //建立画刷需要的 ID2D1GradientStopCollection 对象
  //ID2D1GradientStopCollection 中包含渐变需要的颜色及位置数组和位图排列规则参数等


ID2D1LinearGradientBrush : 线性渐变画刷
{建立函数}
function CreateLinearGradientBrush(
  const linearGradientBrushProperties: TD2D1LinearGradientBrushProperties; //描述渐变轴的结构体
  brushProperties: PD2D1BrushProperties;               //描述透明度及 2D 变换的结构指针
  gradientStopCollection: ID2D1GradientStopCollection; //通过该接口传递 TD2D1GradientStop 结构(颜色及位置)的数组
  out linearGradientBrush: ID2D1LinearGradientBrush    //输出建立的对象
): HResult; stdcall;

{描述渐变轴的结构体}
TD2D1LinearGradientBrushProperties = record
  startPoint: D2D1_POINT_2F;
  endPoint: D2D1_POINT_2F;
end;
{描述透明度及 2D 变换的结构体}
TD2D1BrushProperties = record
  opacity: Single;
  transform: D2D1_MATRIX_3X2_F;
end;
{描述位置与颜色的结构体}
TD2D1GradientStop = record
  position: Single;
  color: D2D1_COLOR_F;
end;


测试代码:

uses Direct2D, D2D1;

procedure TForm1.FormPaint(Sender: TObject);
var
  cvs: TDirect2DCanvas;
  iBrush: ID2D1LinearGradientBrush;
  R: TRect;
  rLinear: TD2D1LinearGradientBrushProperties;
  arrGradientStop: array[0..2] of TD2D1GradientStop;
  iGradientStops: ID2D1GradientStopCollection;
begin
  cvs := TDirect2DCanvas.Create(Canvas, ClientRect);

  R := ClientRect;
  InflateRect(R, -ClientWidth div 6, -ClientHeight div 6);

  {对角线轴}
  rLinear.startPoint := D2D1PointF(R.Left, R.Top);
  rLinear.endPoint := D2D1PointF(R.Right, R.Bottom);

  {横向轴}
//  rLinear.startPoint := D2D1PointF(R.Left, ClientHeight / 2);
//  rLinear.endPoint := D2D1PointF(R.Right, ClientHeight / 2);

  arrGradientStop[0].position := 0.0;
  arrGradientStop[0].color := D2D1ColorF(clRed);
  arrGradientStop[1].position := 0.5;
  arrGradientStop[1].color := D2D1ColorF(clYellow);
  arrGradientStop[2].position := 1.0;
  arrGradientStop[2].color := D2D1ColorF(clGreen);

  cvs.RenderTarget.CreateGradientStopCollection(
    @arrGradientStop[0], Length(arrGradientStop), D2D1_GAMMA_2_2, D2D1_EXTEND_MODE_CLAMP, iGradientStops
  );

  cvs.RenderTarget.CreateLinearGradientBrush(rLinear, nil, iGradientStops, iBrush);
  cvs.Brush.Handle := iBrush;

  cvs.BeginDraw;
  cvs.Rectangle(R);
  cvs.EndDraw;
  cvs.Free;
end;

procedure TForm1.FormResize(Sender: TObject);
begin
  Repaint;
end;


效果图:



本文转载自:http://www.cnblogs.com/del/archive/2011/04/02/2003198.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
Direct2D教程(八)梯度色画刷

概述 单色画刷产生的颜色是单一的,比如一个红色画刷只能输出红色,而渐变画刷则不同,它可以输出多种颜色,这些颜色通常是连续的,从一个颜色平滑过渡到另一个颜色,看起来有渐变的效果。渐...

吞吞吐吐的
2017/08/08
0
0
Direct2D教程(十一)几何变换

什么是几何变换(Transform) 在图形学中,主要有三种几何变换,分别是平移(Translate),旋转(Rotation)和缩放(Scaling)。在D2D中,这三种变换都有实现,而且还有一种不太常见的变换,...

吞吞吐吐的
2017/09/12
0
0
Direct2D教程(十)绘制文本

概述 在Direct2D中,文本的绘制是通过DirectWrite来实现的,DirectWrite实际上已经是一个独立的DirectX组件了。关于DirectWrite,我摘录了MSDN的一段文字。 DirectWrite介绍 当今的应用程序应...

吞吞吐吐的
2017/10/17
0
0
Direct2D教程(十二)图层

什么是Layers? Layer,中文译成图层,在Direct2D中可以用来完成一些特殊效果,使用Layer的时候,先将Layer Push到render target,然后进行绘制,此时是直接绘制在Layer上的,绘制完毕后,将...

吞吞吐吐的
2017/10/26
0
0
WPF 使用 Direct2D1 画图 绘制基本图形

本文来告诉大家如何在 Direct2D1 绘制基本图形,包括线段、矩形、椭圆 本文是一个系列 WPF 使用 Direct2D1 画图入门 WPF 使用 Direct2D1 画图 绘制基本图形 本文的组织参考Direct2D,对大神表...

lindexi_gd
04/19
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

idea新建springCloud项目(5)- 订单服务

1.创建订单api,如下: 2.创建订单实现逻辑 3.新建订单、订单商品表 -- 订单 create table `order_master` ( `order_id` varchar(32) not null, `buyer_name` varchar(32) not null comment......

monroeCode
4分钟前
0
0
游戏开发经验谈(二):对战类全球服游戏的设计与实现

上篇文章《游戏开发经验谈(一):游戏架构里隐藏的五个坑及其应对方案》,我们主要讲解了游戏架构设计当中隐藏的一些坑及其应对方案,错过的小伙伴可以回溯之前的内容。本期内容,将会重点介...

UCloudTech
13分钟前
0
0
Mysql基本语法

一.联合主键 drop table CONTENT_AND_CATALOG;CREATE TABLE `tobebetter`.`CONTENT_AND_CATALOG` ( `ID` VARCHAR(120) NOT NULL , `CONTENT_ID` VARCHAR(120) , `CA......

我是菜鸟我骄傲
15分钟前
0
0
179. centos7 安装mariadb

1. centos7 中安装mariadb 1.1 执行安装 centos7 自带了mariadb yum -y install mariadb mariadb-server 1.2 启动mariadb systemctl start mariadb 1.3 设置开机启动 systemctl enable maria......

Lucky_Me
22分钟前
0
0
【AI实战】动手训练自己的目标检测模型(YOLO篇)

在前面的文章中,已经介绍了基于SSD使用自己的数据训练目标检测模型(见文章:手把手教你训练自己的目标检测模型),本文将基于另一个目标检测模型YOLO,介绍如何使用自己的数据进行训练。 ...

雪饼
28分钟前
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部