文档章节

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

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 158
阅读 7
收藏 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

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/07/01/1233078.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
关于略缩图的事情,比较细致的问题!

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

彭哥
2012/04/05
403
7
C# WinForm开发系列 - GDI+

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

长征2号
2017/11/14
0
0
微信分享大图遇到的问题(Android)

起因: 要做一个微信图片分享的功能,但是对于大图会如下问题: 当时没有仔细查看错误日志,单纯的以为是图片太大的问题。 分享图片代码: 1 public void WXsharePic(String transaction, f...

懒星人
09/18
0
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
843
2
PDF 文档略缩图--ThumbnailPDF

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

孔小菜
2015/05/14
217
0

没有更多内容

加载失败,请刷新页面

加载更多

让哲学照亮我们的人生——读《医务工作者需要学点哲学》有感2600字

让哲学照亮我们的人生——读《医务工作者需要学点哲学》有感2600字: 作者:孙冬梅;以前读韩国前总统朴槿惠的著作《绝望锻炼了我》时,里面有一句话令我印象深刻,她说“在我最困难的时期,...

原创小博客
18分钟前
0
0
JAVA-四元数类

public class Quaternion { private final double x0, x1, x2, x3; // 四元数构造函数 public Quaternion(double x0, double x1, double x2, double x3) { this.x0 = ......

Pulsar-V
35分钟前
13
0
Xshell利用Xftp传输文件,使用pure-ftpd搭建ftp服务

Xftp传输文件 如果已经通过Xshell登录到服务器,此时可以使用快捷键ctrl+alt+f 打开Xftp并展示Xshell当前的目录,之后直接拖拽传输文件即可。 pure-ftpd搭建ftp服务 pure-ftpd要比vsftp简单,...

野雪球
37分钟前
1
0
Confluence 6 文档主题合并问答

在 Confluence 官方 前期发布的消息 中,文档主题在 Confluence 6.0 及其后续版本中已经不可用。我们知道你可能对这个有很多好好奇的问题,因此我们在这里设置了一个问答用于帮助你将这个主题...

honeymose
今天
2
0
java框架学习日志-2

上篇文章(java框架学习日志-1)虽然跟着写了例子,也理解为什么这么写,但是有个疑问,为什么叫控制反转?控制的是什么?反转又是什么? 控制其实就是控制对象的创建。 反转与正转对应,正转...

白话
今天
7
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部