文档章节

再学 GDI+[82]: TGPImage(2) - GetThumbnailImage - 略缩图

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 158
阅读 7
收藏 0
点赞 0
评论 0
本例效果图:



代码文件:
unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    procedure FormPaint(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses GDIPOBJ, GDIPAPI;

procedure TForm1.FormPaint(Sender: TObject);
var
  g: TGPGraphics;
  img,imgSmall: TGPImage;
begin
  g := TGPGraphics.Create(Self.Canvas.Handle);

  img := TGPImage.Create('C:\temp\test.png');

  {如果图像没有携带略缩图, 将缩放生成; 略缩图一般不应超过 120*120}
  imgSmall := img.GetThumbnailImage(32, 32, nil, nil);

  g.DrawImage(img, 0, 0, img.GetWidth, img.GetHeight);
  g.DrawImage(imgSmall, img.GetWidth + 4, 0, imgSmall.GetWidth, imgSmall.GetHeight);

  imgSmall.Free;
  img.Free;
  g.Free;
end;

end.

 
 
 
 
 

 

 

  
窗体文件:
object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 151
  ClientWidth = 230
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
end

 
 
 
 
 

 

 

  

© 著作权归作者所有

共有 人打赏支持
涂孟超
粉丝 12
博文 2004
码字总数 14107
作品 0
深圳
程序员
略缩图的事情

1.设计师把产品略缩图定义为120px宽,180px高,但我们上传的大图片是不可能都处得标准,有的是20003500,有的可能是38002300,等等,各种长宽高都可能有。 2.上传后要生成略缩图,不要变形,...

彭哥 ⋅ 2012/04/05 ⋅ 0

关于略缩图的事情,比较细致的问题!

1.设计师把产品略缩图定义为120px宽,180px高,但我们上传的大图片是不可能都处得标准,有的是20003500,有的可能是38002300,等等,各种长宽高都可能有。 2.上传后要生成略缩图,不要变形,...

彭哥 ⋅ 2012/04/05 ⋅ 7

C# WinForm开发系列 - GDI+

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

长征2号 ⋅ 2017/11/14 ⋅ 0

在.net中使用GDI+来提高gif图片的保存画质

//本文章有www.blue1000.com翻译,原文地址http://codebetter.com/blogs/brendan.tompkins/archive/2004/01/26/6103.aspx //尊重他人劳动成果,转载请注明出处。 写程序的时候经常用到gdi+,...

晨曦之光 ⋅ 2012/03/09 ⋅ 0

Chrome dev 更新到 10.0.642.2 , 很多新特性

Windows Mac 和 Linux 平台的 Chrome Dev 更新到了 10.0.642.2 所有平台: V8 引擎更新至 3.0.7.0 标签化设置页布局改进 集成标签化的 about:sync 页面,查看数据同步细节 内置 pdf 插件:打...

红薯 ⋅ 2011/01/21 ⋅ 2

PDF 文档略缩图--ThumbnailPDF

ThumbnailPDF 可以让你创建 PDF 文档的略缩图。

孔小菜 ⋅ 2015/05/14 ⋅ 0

结合ashx来在DataGrid中显示从数据库中读出的图片

作者:木子 http://blog.csdn.net/derny/ 下面利用ashx文件可以方便实现从数据库中读取图片并显示在datagrid当中 //---------------------------------------BindImage.aspx --------------...

晨曦之光 ⋅ 2012/03/09 ⋅ 0

C# 图片Base64 编码,图片格式转换

一. Base64的编码规则 Base64编码的思想是是采用64个基本的ASCII码字符对数据进行重新编码。它将需要编码的数据拆分成字节数组。以3个字节为一组。按顺序排列24 位数据,再把这24位数据分成4...

鱼煎 ⋅ 2016/12/01 ⋅ 0

子弹兄/CuPlayerMini

#CuPlayerMini 官方网址: http://www.cuplayer.com/ 这是第三版和第四版的源码 这里是免费版本的,官方有收费版本的 酷播迷你CuPlayerMiniV4.1版(永久免费版) 酷播迷你CuPlayerMiniV4.1 重要...

子弹兄 ⋅ 2014/10/20 ⋅ 0

php截取视频第一帧 作为略缩图,怎么弄?

php截取视频第一帧 作为略缩图,了解过ffmpeg-php能实现 但是去官网下载ffmpeg扩展 一大坨文件没见过dll后缀名文件,也不知道怎么搞?请问各位有ffmpeg-php扩展吗?...

风吹花香 ⋅ 2016/12/07 ⋅ 4

没有更多内容

加载失败,请刷新页面

加载更多

下一页

LVM

LVM: 硬盘划分分区成物理卷->物理卷组成卷组->卷组划分逻辑分区。 1.磁盘分区: fdisk /dev/sdb 划分几个主分区 输入t更改每个分区类型为8e(LVM) 使用partprobe生成分区的文件:如/dev/sd...

ZHENG-JY ⋅ 29分钟前 ⋅ 0

彻底删除Microsoft Office的方法

参照此链接彻底删除Office https://support.office.com/zh-cn/article/%e4%bb%8e-pc-%e5%8d%b8%e8%bd%bd-office-9dd49b83-264a-477a-8fcc-2fdf5dbf61d8?ui=zh-CN&rs=zh-CN&ad=CN......

Kampfer ⋅ 44分钟前 ⋅ 0

大盘与个股之间关系

大盘走多:积极出手 顺势加码 大盘走空: 少量出手 退场观望 大盘做头:逆势减码 少量操作 大盘做底 : 小量建仓 小量试单

guozenhua ⋅ 46分钟前 ⋅ 0

Day16 LVM(逻辑卷管理)与磁盘故障小案例

lvm详解 简述 LVM的产生是因为传统的分区一旦分区好后就无法在线扩充空间,也存在一些工具能实现在线扩充空间但是还是会面临数据损坏的风险;传统的分区当分区空间不足时,一般的解决办法是再...

杉下 ⋅ 52分钟前 ⋅ 0

rsync实现多台linux服务器的文件同步

一、首先安装rsync,怎样安装都行,rpm,yum,还是你用源码安装都可以。因为我用的是阿里云的ESC,yum install rsync就ok了。 二、配置rsync服务 1.先建立个同步数据的帐号 123 groupadd r...

在下头真的很硬 ⋅ 今天 ⋅ 0

前端基础(三):函数

字数:1685 阅读时间:5分钟 函数定义 在最新的ES规范中,声明函数有4中方法: -函数声明 -函数表达式 -构造函数Function -生成器函数 1.函数声明 语法: function name([param[, param2 [....

老司机带你撸代码 ⋅ 今天 ⋅ 0

Java虚拟机的Heap监狱

在Java虚拟机中,我是一个位高权重的大管家,他们都很怕我,尤其是那些Java 对象,我把他们圈到一个叫做Heap的“监狱”里,严格管理,生杀大权尽在掌握。 中国人把Stack翻译成“栈”,把Hea...

java高级架构牛人 ⋅ 今天 ⋅ 0

Spring MVC基本概念

只写Controller

颖伙虫 ⋅ 今天 ⋅ 0

微软重金收购GitHub的背后逻辑原来是这样的

全球最大的开发者社区GitHub网站花落谁家的问题已经敲定,微软最终以75亿美元迎娶了这位在外界看来无比“神秘”的小家碧玉。尽管此事已过去一些时日,但整个开发者世界,包括全球各地的开源社...

linux-tao ⋅ 今天 ⋅ 0

磁盘管理—逻辑卷lvm

4.10-4.12 lvm 操作流程: 磁盘分区-->创建物理卷-->划分为卷组-->划分成逻辑卷-->格式化、挂载-->扩容。 磁盘分区 注: 创建分区时需要更改其文件类型为lvm(代码8e) 分区 3 已设置为 Linu...

弓正 ⋅ 今天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部