图像编码的参数.pdf

《图像编码的参数.pdf》由会员分享，可在线阅读，更多相关《图像编码的参数.pdf（11页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、图像编码的参数通过 IGPImage.GetEncoderParameterList 可以获取指定编码格式的参数列表;通过此列表可以遍历出各参数的指针:PGPNativeEncoderParameter(TGPNativeEncoderParameter 的指针);TGPNativeEncoderParameter 是一个结构体:TGPNativeEncoderParameter=recordGuid:TGUID;参数标识 NumberOfValues:ULONG;参数数组的元素数 ValueType:TGPEncoderParameterValueType;参数类型 Value:Pointe

2、r;参数数据指针 end;/其中的 TGPEncoderParameterValueType 是个枚举,枚举值有:EncoderParameterValueTypeByte=1 字节数组 EncoderParameterValueTypeASCII=2 PAnsiChar EncoderParameterValueTypeShort=3 Word EncoderParameterValueTypeLong=4 Cardinal EncoderParameterValueTypeRational=5 Cardinal/Cardinal;第一个数是分子,第二个数是分母 EncoderParamet

3、erValueTypeLongRange=6 一对 Cardinal,表示一个数值范围 EncoderParameterValueTypeUndefined=7 可包含任何数据类型的字节数组 EncoderParameterValueTypeRationalRange=8四 个整 数:Cardinal/Cardinal,Cardinal/Cardinal EncoderParameterValueTypePointer=9 指针/EncoderParameterValueTypeRationalRange 中的四个整数通过分数运算得到的两个值:最小值.最大值.每个编码器的参数肯定会有区别,下面

4、代码获取了 JPEG 编码器所能支持的参数信息:uses GdiPlus;procedureTForm1.Button1Click(Sender:TObject);varImage:IGPImage;Parameters:IGPEncoderParameters;Param:PGPNativeEncoderParameter;beginImage:=TGPBitmap.Create(1,1);Parameters:=Image.GetEncoderParameterList(TGPImageFormat.Jpeg.CodecId);Memo1.Clear;for ParaminParamete

5、rs do with Memo1.Lines dobeginAdd(Format(Guid:%s,GUIDToString(Param.Guid);Add(Format(NumberOfValues:%d,Param.NumberOfValues);Add(Format(ValueType:%d,Ord(Param.ValueType);Add(Format(Value:$%p,Param.Value);Add(EmptyStr);end;end;(*结果:Guid:8D0EB2D1-A58E-4EA8-AA14-108074B7B6F9NumberOfValues:5ValueType:4V

6、alue:$00AD8190Guid:1D5BE4B5-FA4A-452D-9CDD-5DB35105E7EBNumberOfValues:1ValueType:6Value:$00AD81A4Guid:EDB33BCE-0266-4A77-B904-27216099E717NumberOfValues:0ValueType:3Value:$00AD81ACGuid:F2E455DC-09B3-4316-8260-676ADA32481CNumberOfValues:0ValueType:3Value:$00AD81AC*)IGPImage.GetEncoderParameterList 方法

7、得到的类型是:IGPEncoderParameters;IGPImage.Save 方法就有一个 IGPEncoderParameters 类型的默认参数,通过它可以传入编码参数.编码参数有很多类型,譬如 EncoderQuality 是决定图片压缩比率的.下面的例子在保存 JPG 文件时使用了三种不同的质量参数(压缩级别):uses GdiPlus;procedureTForm1.Button1Click(Sender:TObject);varPrams:IGPEncoderParameters;Image:IGPImage;Graphics:IGPGraphics;Quality:Inte

8、ger;beginChDir(C:GdiPlusImg);Image:=TGPImage.Create(GrapeBunch.bmp);Prams:=TGPEncoderParameters.Create;Quality:=1;Prams.Add(EncoderQuality,Quality);Image.Save(GrapeBunch_1.jpg,TGPImageFormat.Jpeg,Prams);Prams.Clear;Quality:=50;Prams.Add(EncoderQuality,Quality);Image.Save(GrapeBunch_50.jpg,TGPImageFo

9、rmat.Jpeg,Prams);Prams.Clear;Quality:=100;Prams.Add(EncoderQuality,Quality);Image.Save(GrapeBunch_100.jpg,TGPImageFormat.Jpeg,Prams);/显示Graphics:=TGPGraphics.Create(Handle);Image:=TGPImage.Create(GrapeBunch_1.jpg);Graphics.DrawImage(Image,10,10);Graphics.TranslateTransform(Image.Width+10,0);Image:=T

10、GPImage.Create(GrapeBunch_50.jpg);Graphics.DrawImage(Image,10,10);Graphics.TranslateTransform(Image.Width+10,0);Image:=TGPImage.Create(GrapeBunch_100.jpg);Graphics.DrawImage(Image,10,10);end;IGPEncoderParameters 的成员:IGPEncoderParameters.GetEnumerator;IGPEncoderParameters.Clear;IGPEncoderParameters.A

11、dd();IGPEncoderParameters.Count;IGPEncoderParameters.Param;IGPEncoderParameters.NativeParams;/其中的 Add 方法有多种重载,这便于添加各种类型的数据;参数类型常数:EncoderCompression 压缩 EncoderColorDepth 颜色深度 EncoderScanMethod 扫描方法 EncoderVersion 版本 EncoderRenderMethod 呈现方法 EncoderQuality 质量 EncoderTransformation 转换 EncoderLuminance

12、Table 亮度表 EncoderChrominanceTable 色度表 EncoderSaveFlag 保存标志 CodecIImageBytes 下面是 GDI+1.1 才开始支持的:EncoderColorSpaceEncoderImageItemsEncoderSaveAsCMYK五种编码器(BMP、JPEG、GIF、TIFF、PNG)分别能支持哪些参数类型呢?支持的参数类型的参数又是什么格式的呢?尽管 Add 方法已准备好了多种重载,用哪个呢?下面的程序列出了各种编码器的参数信息:uses GdiPlus;constParamValueTypeArr:array1.9 of str

13、ing=(ValueTypeByte,ValueTypeASCII,ValueTypeShort,ValueTypeLong,ValueTypeRational,ValueTypeLongRange,ValueTypeUndefined,ValueTypeRationalRange,ValueTypePointer);/自定义函数function GetGuidName(g:TGUID):string;vars:string;begins:=EmptyStr;ifIsEqualGUID(g,EncoderCompression)then s:=EncoderCompression;ifIsEq

14、ualGUID(g,EncoderColorDepth)then s:=EncoderColorDepth;ifIsEqualGUID(g,EncoderScanMethod)then s:=EncoderScanMethod;ifIsEqualGUID(g,EncoderVersion)then s:=EncoderVersion;ifIsEqualGUID(g,EncoderRenderMethod)then s:=EncoderRenderMethod;ifIsEqualGUID(g,EncoderQuality)then s:=EncoderQuality;ifIsEqualGUID(

15、g,EncoderTransformation)then s:=EncoderTransformation;ifIsEqualGUID(g,EncoderLuminanceTable)then s:=EncoderLuminanceTable;ifIsEqualGUID(g,EncoderChrominanceTable)then s:=EncoderChrominanceTable;ifIsEqualGUID(g,EncoderSaveFlag)then s:=EncoderSaveFlag;ifIsEqualGUID(g,CodecIImageBytes)thens:=CodecIImag

16、eBytes;$IF(GDIPVER=$0110)ifIsEqualGUID(g,EncoderColorSpace)then s:=EncoderColorSpace;ifIsEqualGUID(g,EncoderImageItems)then s:=EncoderImageItems;ifIsEqualGUID(g,EncoderSaveAsCMYK)then s:=EncoderSaveAsCMYK;$IFENDResult:=s;end;procedureTForm1.Button1Click(Sender:TObject);varImage:IGPImage;Parameters:I

17、GPEncoderParameters;Param:PGPNativeEncoderParameter;Encoder:IGPImageCodecInfo;beginImage:=TGPBitmap.Create(1,1);Memo1.Clear;for EncoderinTGPImageCodecInfo.GetImageEncoders do with Memo1.Lines dobeginParameters:=Image.GetEncoderParameterList(Encoder.ClsId);Add(-);Add(Format(编码器类型:%s,Encoder.FormatDes

18、cription);ifParameters.Count=0 thenbeginAdd(无参数);Add(EmptyStr);Continue;end;Add(Format(参数个数:%d,Parameters.Count);for ParaminParameters dobeginAdd(Format(参数类型:%s,GetGuidName(Param.Guid);Add(Format(参数值类型:%s,ParamValueTypeArrOrd(Param.ValueType);Add(Format(参数值个数:%d,Param.NumberOfValues);Add(Format(参数值指

19、针:$%p,Param.Value);Add(EmptyStr);end;end;end;(*显示结果:-编码器类型:BMP无参数-编码器类型:JPEG参数个数:4参数类型:EncoderTransformation参数值类型:ValueTypeLong参数值个数:5参数值指针:$00AD8190参数类型:EncoderQuality参数值类型:ValueTypeLongRange参数值个数:1参数值指针:$00AD81A4参数类型:EncoderLuminanceTable参数值类型:ValueTypeShort参数值个数:0参数值指针:$00AD81AC参数类型:EncoderChromi

20、nanceTable参数值类型:ValueTypeShort参数值个数:0参数值指针:$00AD81AC-编码器类型:GIF无参数-编码器类型:TIFF参数个数:3参数类型:EncoderCompression参数值类型:ValueTypeLong参数值个数:5参数值指针:$00AD8190参数类型:EncoderColorDepth参数值类型:ValueTypeLong参数值个数:5参数值指针:$00AD81A4参数类型:EncoderSaveFlag参数值类型:ValueTypeLong参数值个数:1参数值指针:$00AD81B8-编码器类型:PNG无参数*)从上面例子可以看出:BMP、G

21、IF、PNG 三种编码器没有编码参数(GIF 在 GDI+1.1 中是不是支持还没有测试).JPEG 支持:EncoderTransformation(转换)EncoderQuality(质量)EncoderLuminanceTable(亮度表)EncoderChrominanceTable(色度表)TIFF 支持:EncoderCompression(压缩)EncoderColorDepth(颜色深度)EncoderSaveFlag(保存标志)进而可以得知:JPEG 编码的参数类型 EncoderTransformation 的可选值是:TGPEncoderValue(13):Encoder

22、ValueTransformRotate90TGPEncoderValue(14):EncoderValueTransformRotate180TGPEncoderValue(15):EncoderValueTransformRotate270TGPEncoderValue(16):EncoderValueTransformFlipHorizontalTGPEncoderValue(17):EncoderValueTransformFlipVerticalJPEG 编码的参数类型 EncoderQuality 的可选值是:0.100TIFF 编码的参数类型 EncoderCompression

23、 的可选值是:TGPEncoderValue(2):EncoderValueCompressionLZWTGPEncoderValue(3):EncoderValueCompressionCCITT3TGPEncoderValue(4):EncoderValueCompressionCCITT4TGPEncoderValue(5):EncoderValueCompressionRleTGPEncoderValue(6):EncoderValueCompressionNoneTIFF 编码的参数类型 EncoderColorDepth 的可选值是:1,4,8,24,32这些值可以从下面程序获取:

24、uses GdiPlus;varImage:IGPImage;Parameters:IGPEncoderParameters;p:PCardinal;procedureTForm1.FormCreate(Sender:TObject);beginImage:=TGPBitmap.Create(1,1);end;$PointerMath OnprocedureTForm1.Button1Click(Sender:TObject);beginParameters:=Image.GetEncoderParameterList(TGPImageFormat.Jpeg.CodecId);p:=Param

25、eters0.Value;EncoderTransformation ShowMessageFmt(%d,%d,%d,%d,%d,p0,p1,p2,p3,p4);13,14,15,16,17 end;procedureTForm1.Button2Click(Sender:TObject);beginParameters:=Image.GetEncoderParameterList(TGPImageFormat.Jpeg.CodecId);p:=Parameters1.Value;EncoderQuality ShowMessageFmt(%d.%d,p0,p1);0.100 end;proce

26、dureTForm1.Button3Click(Sender:TObject);beginParameters:=Image.GetEncoderParameterList(TGPImageFormat.Tiff.CodecId);p:=Parameters0.Value;EncoderCompression ShowMessageFmt(%d,%d,%d,%d,%d,p0,p1,p2,p3,p4);2,3,5,4,6 end;procedureTForm1.Button4Click(Sender:TObject);beginParameters:=Image.GetEncoderParame

27、terList(TGPImageFormat.Tiff.CodecId);p:=Parameters1.Value;EncoderColorDepth ShowMessageFmt(%d,%d,%d,%d,%d,p0,p1,p2,p3,p4);1,4,8,24,32 end;下面例子通过设置 JPEG 的 EncoderTransformation 编码参数,保存了旋转后的图片:uses GdiPlus;procedureTForm1.Button1Click(Sender:TObject);varGraphics:IGPGraphics;Prams:IGPEncoderParameters;

28、Image:IGPImage;beginChDir(C:GdiPlusImg);Image:=TGPImage.Create(Grapes.jpg);Prams:=TGPEncoderParameters.Create;Prams.Add(EncoderTransformation,EncoderValueTransformRotate90);Image.Save(Grapes_Rotate90.jpg,TGPImageFormat.Jpeg,Prams);Graphics:=TGPGraphics.Create(Handle);Graphics.DrawImage(Image,10,10,Image.Width,Image.Height);end;/为什么只有 JPEG 提供这种编码参数呢?因为 jpg 文件在自动保存过程中会降低品质,通过这种变换则不会.另外:1、编码参数值类型很多是 Cardinal,这都是官方资料上的;但 Add 函数中要的是 Integer类型.2、从上面获取的信息可以知道,GDI+1.0 还无法写入 gif 动画;GDI+1.1 能不能还没有测试.3、通过设置 TIFF 编码器的 EncoderSaveFlag 类型参数可保存多页的 TIFF 文件,下次接上.原文地址：http:/www.xm5.org/book/7/