delphi 2010 调整图片的比例
生活随笔
收集整理的這篇文章主要介紹了
delphi 2010 调整图片的比例
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
TWICImage 的 Width、Height 屬性, 可以讀取但不能賦值.
調整 TWICImage 的大小、比例, 可以通過 IWICBitmapScaler 接口.
//IWICBitmapScaler.Initialize 函數有四種比例變換的算法: WICBitmapInterpolationModeNearestNeighbor = 0; WICBitmapInterpolationModeLinear? ? ? ? ? = $1; WICBitmapInterpolationModeCubic? ? ? ? ? = $2; WICBitmapInterpolationModeFant? ? ? ? ? ? = $3;
測試代碼:
unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: TButton;procedure Button1Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Wincodec;procedure TForm1.Button1Click(Sender: TObject); varWicImg: TWICImage;Factory: IWICImagingFactory;Scaler: IWICBitmapScaler; {圖像比例變換接口} beginWicImg := TWICImage.Create;WicImg.LoadFromFile('c:\temp\test.jpg');Factory := WicImg.ImagingFactory;Factory.CreateBitmapScaler(Scaler);Scaler.Initialize(WicImg.Handle,WicImg.Width div 2, WicImg.Height div 3,WICBitmapInterpolationModeFant);WicImg.Handle := IWICBitmap(Scaler);Canvas.Draw(0, 0, WicImg);Scaler := nil;Factory := nil;WicImg.Free; end;end.
轉載于:https://www.cnblogs.com/gzcszzx/archive/2011/08/13/2137567.html
總結
以上是生活随笔為你收集整理的delphi 2010 调整图片的比例的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: .NET核心正则类详解
- 下一篇: line-height的一点见识