文档章节

再学 GDI+[60]: TGPGraphics.SetSmoothingMode - 绘图质量

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 276
阅读 11
收藏 0
本例效果图:



代码文件:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    procedure FormCreate(Sender: TObject);
    procedure FormPaint(Sender: TObject);
    procedure ListBox1Click(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses GDIPOBJ, GDIPAPI;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ListBox1.Align := alRight;
  with ListBox1.Items do
  begin
    Add('SmoothingModeInvalid    ');       
    Add('SmoothingModeDefault    ');
    Add('SmoothingModeHighSpeed  ');     
    Add('SmoothingModeHighQuality');   
    Add('SmoothingModeNone       ');
    Add('SmoothingModeAntiAlias  ');  
  end;
end;

procedure TForm1.FormPaint(Sender: TObject);
var
  g: TGPGraphics;
  p: TGPPen;
begin
  g := TGPGraphics.Create(Canvas.Handle);
  p := TGPPen.Create(aclRed, 2);

  g.SetSmoothingMode(ListBox1.ItemIndex - 1);
  g.DrawEllipse(p, 10, 10, ClientWidth - ListBox1.Width - 20, ClientHeight - 20);
  g.DrawLine(p, 0, 0, ClientWidth - ListBox1.Width, ClientHeight);
  g.DrawLine(p, ClientWidth - ListBox1.Width, 0, 0, ClientHeight);

  p.Free;
  g.Free;
end;

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

end.

 
 
 
 
 

 

 

  
窗体文件:
object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 108
  ClientWidth = 286
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object ListBox1: TListBox
    Left = 133
    Top = 8
    Width = 145
    Height = 73
    ItemHeight = 13
    TabOrder = 0
    OnClick = ListBox1Click
  end
end

 
 
 
 
 

 

 

  
绘图质量参数:
SmoothingModeInvalid     = -1; {指定一个无效模式}
SmoothingModeDefault     = 0;  {指定不消除锯齿}
SmoothingModeHighSpeed   = 1;  {指定高速度、低质量呈现}
SmoothingModeHighQuality = 2;  {指定高质量、低速度呈现}
SmoothingModeNone        = 3;  {指定不消除锯齿}
SmoothingModeAntiAlias   = 4;  {指定消除锯齿的呈现}

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/06/23/1228119.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
C# WinForm开发系列 - GDI+

UI(User Interface)编程在整个项目开发过程中是个颇为重要的环节,任何好的解决方案若没有良好的用户界面呈现给最终用户,那么就算包含了最先进的技术也不能算是好程序。UI编程体现在两个方...

长征2号
2017/11/14
0
0
【Visual C++】游戏开发笔记之四——游戏画面绘图(一)基本图形绘制

本系列文章由zhmxy555编写,转载请注明出处。 http://blog.csdn.net/zhmxy555/article/details/7333886 作者:毛星云 邮箱: happylifemxy@qq.com 欢迎邮件交流编程心得 从本篇文章开始笔锋一...

长平狐
2012/11/12
115
0
实战开发:新手小白如何用C++制作经典网游DNF

十年前,那时候的网吧还不叫网咖,那时候没有王者荣耀也没有英雄联盟,那时候梦幻西游刚推出珍宝阁系统,那时候巫妖王的灵魂还封闭在冰封王座。 寻仙、穿越火线、征途、天龙八部……同时在线...

stone15165
05/05
0
0
Winform 界面开发

小弟在.net Winform 这一块儿工地灰常一般,最近从事相关开发,才发现原来界面制作也是一门很深的学问呀,IDE 自带的控件什么的 几乎都用不了 完全达不到视觉要求 ,一个简单的按钮 在XP经典...

青蛙天涯
2011/10/30
5.6K
10
OpenGL基础技术讲座--体系结构

OpenGL是一套图形标准,它严格按照计算机图形学原理设计而成,符合光学和视觉原理,非常适合可视化仿真系统。 首先,在OpenGL中允许视景对象用图形方式表达,如由物体表面顶点坐标集合构成的...

teacheryang
2010/10/30
0
0

没有更多内容

加载失败,请刷新页面

加载更多

聊聊redisson的DelayedQueue

序 本文主要研究一下redisson的DelayedQueue maven <dependency><groupId>org.redisson</groupId><artifactId>redisson</artifactId><version>3.8.1</version></dependenc......

go4it
29分钟前
1
0
一张图看懂JVM

JVM结构示意图 JVM总体概述 JVM总体上是由类装载子系统(ClassLoader)、运行时数据区、执行引擎、内存回收这四个部分组成。其中我们最为关注的运行时数据区,也就是JVM的内存部分则是由方法...

小致dad
30分钟前
1
0
安全管理标准

安全生产严重等级分类: 故障频次: 风险等级矩阵:

乔老哥
今天
2
0
数据结构“树”的相关微视频

今天在腾讯视频上闲逛,然後发现一个叫“岚人”的用户上传了几段小视频,基本上都在5分钟以内,讲解了关于树的一些结构和算法。零代码,非常适合初学者入门。不过,对于老鸟来说,这也是非常...

Iridium
今天
1
0
10-利用思维导图梳理JavaSE-Java 集合

10-利用思维导图梳理JavaSE-Java 集合 主要内容 1.Collection接口 2.Set接口 2.1.Set接口概述 2.2.HashSet类 2.3.TreeSet类 2.4.SortedSet接口 3.List接口 3.1.List接口概述 3.2.ArrayList类...

飞鱼说编程
今天
7
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部