//显示图像
var
  g: TGPGraphics;
  img: TGPImage;
begin
  g := TGPGraphics.Create(Self.Canvas.Handle);   img := TGPImage.Create('c:\temp\x.jpg');   g.DrawImage(img,,); {参数2、3是坐标}   img.Free;
  g.Free;
end;

//按标准的高度与宽度显示图像
var
  g: TGPGraphics;
  img: TGPImage;
begin
  g := TGPGraphics.Create(Canvas.Handle);   img := TGPImage.Create('c:\temp\x.jpg');   g.DrawImage(img, , , img.GetWidth, img.GetHeight);   img.Free;
  g.Free;
end;

//按指定高度与宽度显示图像
var
  g: TGPGraphics;
  img: TGPImage;
begin
  g := TGPGraphics.Create(Canvas.Handle);   img := TGPImage.Create('c:\temp\x.jpg');   g.DrawImage(img, , , , );   img.Free;
  g.Free;
end;

//略缩图
var
  g : TGPGraphics;
  img, imgSmall: TGPImage;
begin
  g := TGPGraphics.Create(Canvas.Handle);
  img:= TGPImage.Create('c:\temp\x.jpg');   imgSmall := img.GetThumbnailImage(, , nil, nil);
  g.DrawImage(imgSmall, , , imgSmall.GetWidth, imgSmall.GetHeight);   img.Free;
  imgSmall.Free;
  g.Free;
end;

//图片平行四边形变换
var
  g: TGPGraphics;
  img: TGPImage;
const
  pts: array[..] of TGPPoint = ((x:; y:),
                                  (x:; y:),
                                  (x:; y:));
begin
  g := TGPGraphics.Create(Canvas.Handle);
  img:= TGPImage.Create('c:\temp\x.jpg');   g.DrawImage(img, , ); {这是原始图片}   g.DrawImage(img, PGPPoint(@pts), );
  {反复测试后, 感悟如下:
    1、只需要 3 个点来控制图片, 不能多或少.
    2、点 1 控制右上角; 点 2 控制左上角; 点 3 控制右下角.
    3、因为是平行四边形, 所以剩下的左下角的点(就是右上角的对角点)程序就可以算得出来了.
  }   img.Free;
  g.Free;
end;

//图像缩放时的算法比对
var
  g: TGPGraphics;
  img: TGPImage;
  w, h: UINT;
begin
  g := TGPGraphics.Create(Canvas.Handle);
  img:= TGPImage.Create('c:\temp\x.jpg');
  w  := img.GetWidth;
  h := img.GetHeight;   g.DrawImage(img, MakeRect(, , w, h), , , w, h, UnitPixel);   g.SetInterpolationMode(InterpolationModeNearestNeighbor);
  g.DrawImage(img, MakeRect(, , 0.6*w, 0.6*h), , , w, h, UnitPixel);   g.SetInterpolationMode(InterpolationModeHighQualityBilinear);
  g.DrawImage(img, MakeRect(, , 0.6*w, 0.6*h), , , w, h, UnitPixel);   g.SetInterpolationMode(InterpolationModeHighQualityBicubic);
  g.DrawImage(img, MakeRect(, , 0.6*w, 0.6*h), , , w, h, UnitPixel);   img.Free;
  g.Free;
end;

缩放或旋转图像时的算法选项:

Delphi 微软 说明
InterpolationModeBicubic Bicubic 指定双三次插值法。不进行预筛选。将图像收缩为原始大小的 25% 以下时,此模式不适用。
InterpolationModeBilinear Bilinear 指定双线性插值法。不进行预筛选。将图像收缩为原始大小的 50% 以下时,此模式不适用。
InterpolationModeDefault Default 指定默认模式。
InterpolationModeHigh High 指定高质量插值法。
InterpolationModeHighQualityBicubic HighQualityBicubic 指定高质量的双三次插值法。执行预筛选以确保高质量的收缩。此模式可产生质量最高的转换图像。
InterpolationModeHighQualityBilinear  HighQualityBilinear  指定高质量的双线性插值法。执行预筛选以确保高质量的收缩。
InterpolationModeInvalid Invalid 等效于 QualityMode 枚举的 Invalid 元素。
InterpolationModeLow Low 指定低质量插值法。
InterpolationModeNearestNeighbor NearestNeighbor 指定最临近插值法。

GDI+ 学习记录(26): 显示图像 - Image的更多相关文章

  1. libgdx学习记录26——Polygon多边形碰撞检测

    libgdx中Math封装了Polygon这个类,它是由多个定点进行描述实现的,在进行物体间的碰撞时,物体轮廓有时候是不规则的,这时候可以用一个多边形勾勒出其大概的轮廓,对其进行模拟. Polygon ...

  2. UWP学习记录9-设计和UI之控件和模式6

    UWP学习记录9-设计和UI之控件和模式6 1.图形和墨迹 InkCanvas是接收和显示墨迹笔划的控件,是新增的比较复杂的控件,这里先不深入. 而形状(Shape)则是可以显示的各种保留模式图形对象 ...

  3. UWP学习记录8-设计和UI之控件和模式5

    UWP学习记录8-设计和UI之控件和模式5 1.日历.日期和时间控件 日期和时间控件提供了标准的本地化方法,可供用户在应用中查看并设置日期和时间值. 有四个日期和时间控件可供选择,选择的依据如下: 日 ...

  4. Echarts学习记录——如何去掉网格线及网格区域颜色

    关键属性 splitLine和splitArea,可以设置相关的属性 示例代码 <!DOCTYPE html> <html lang="en"> <h ...

  5. Echarts学习记录——如何给x轴文字标签添加事件

    Echarts学习记录——如何给x轴文字标签添加事件 关键属性 axisLabel下属性clickable:true 并给图表添加单击事件 根据返回值判断点击的是哪里 感觉自己的方法有点变扭,有更好办 ...

  6. MyBatis 学习记录5 MyBatis的二级缓存

    主题 之前学习了一下MyBatis的一级缓存,主要涉及到BaseExecutor这个类. 现在准备学习记录下MyBatis二级缓存. 配置二级缓存与初始化发生的事情 首先二级缓存默认是不开启的,需要自 ...

  7. JavaScript学习记录一

    title: JavaScript学习记录一 toc: true date: 2018-09-11 18:26:52 --<JavaScript高级程序设计(第2版)>学习笔记 要多查阅M ...

  8. git原理学习记录:从基本指令到背后原理,实现一个简单的git

    一开始我还担心 git 的原理会不会很难懂,但在阅读了官方文档后我发现其实并不难懂,似乎可以动手实现一个简单的 git,于是就有了下面这篇学习记录. 本文的叙述思路参照了官方文档Book的原理介绍部分 ...

  9. Java 8 学习记录

    Java 8 学习记录 官方文档 https://docs.oracle.com/javase/8/ https://docs.oracle.com/javase/8/docs/index.html ...

随机推荐

  1. linux驱动系列之调试环境搭建一

    2014年刚开始学习linux时,搭建环境花了很多时间.当时最熟悉的是单片机如Mag16和stm32,依据以往学习单片机的经验肯定要用下载器下载程序,但是我找了很久没有比较好的IDE,不像Mag16有 ...

  2. 深层解析:构建facebook应用商店推荐引擎

    Under the Hood: Building the App Center recommendation engine   As more apps on Facebook Platform ha ...

  3. 1050 棋盘染色 2 - Wikioi

    题目描述 Description 有一个5*N的棋盘,棋盘中的一些格子已经被染成了黑色,你的任务是对最少的格子染色,使得所有的黑色能连成一块. 输入描述 Input Description 第一行一个 ...

  4. 同一台Windows机器中启动多个Memcached服务

    同一台Windows机器中启动多个Memcached服务 这就需要在一台机器上启动多个Memcached服务了. 假设Memcached在如下目录:C:\memcached\memcached.exe ...

  5. bzoj 1222: [HNOI2001]产品加工 dp

    1222: [HNOI2001]产品加工 Time Limit: 15 Sec  Memory Limit: 162 MBSubmit: 381  Solved: 218[Submit][Status ...

  6. jsp 获取表单值, 提交类型为multipart/form-data处理

    //tt.jsp<script type="text/javascript"> function doSubmit(){ alert("aaaaaa" ...

  7. console中应用MFC类的方法

    1.添加#include <afx.h>或者<afxwin.h> 这时会报错1>c:\program files\microsoft visual studio 8\vc ...

  8. [itint5]摆放窗口

    http://www.itint5.com/oj/#47 一种做法是:把矩形所占的方格都设为-1,就是个最大子矩阵和问题.复杂度o(w^2*h)或o(w*h^2),空间W*H猜想应用场景是:电脑屏幕上 ...

  9. [mock]12月28日

    假设我们有一个全局升序数组,这个数组长度unlimited现在我们有一个全局的指针和一个目标target值,target和指针你不可见.但是有以下几个操作bool istag();void gorig ...

  10. XMPP聊天客户端环境搭建

    1.服务器选择:ejabberd,具体安装过程请参考:http://blog.csdn.net/linhanmin/article/details/9876819 2.客户端配置: 采用xmppfra ...