利用Delphi的TJPEGImage控件把BMP转化成JPEG

• 
  在工作过程中我经常使用到两种图象——网页上的JPEG图象和杂志题目的BMP图象。一般来说我把原始的BMP图象保存在CD中，然后用Delphi应用程序把它们转化成JPEG文件。这篇文章我将介绍如何利用Delphi应用程序把BMP图象转化成JPEG图象及反之转化。如果要查看图象格式信息，请点击 这里.
  
  TJPEGImage
  
  在Delphi 3中，Delphi控件库中的Timage控件能显示不同格式的文件，如BMP, ICO, WMF/EMF, and JPEG文件。然后，能够显示文件格式并不等于能够进行文件格式之间的转化。Timage控件中的LoadFromFile和SaveToFile事件能保存一个BMP文件，但如果你保存JPG文件，你也只能采用BMP格式存放。
  
  幸运的是，Delphi 3中的TJPEGImage控件能很好地解决了上面的问题，这一控件没有直接存放在控件库中，它均以JPEB形式声明和说明。如果你想找到这一控件的例程源代码，请点击Dehphi目录下的Info\Extras\JPEG路径(不要告诉我你从没打开这一目录，这里有很多好东东)。
  
  TJPEGImage控件从Tgraphic控件引申出来，所以它与Tbitmap控件相兼容，如Listing A如示。你可以利用TJPEGImage控件写出一个把BMP转化成JPEG的例子。
  
  注意到Tbitmap使用LoadFromFile事件传入文件，但是你必需只能利用TJPEGImage的SaveToStream事件保存JPEG图象到文件，后者没有如SaveToFile的事件。这一过程包括了文件压缩质量的百分比，缺省值是100%。
  
  例如，我把44,280字节的Handshak.bmp文件从Common Files\Borland Shared\Images\Splash\256Color目录下转化为12种JPEG文件，这一过程采用100％，95%,90%,85%,80%,75%,70%,65%,60%,55%,50%,0%的压缩质量百分比，如Table A所示。在50%下，图象不再有很好的质量。100%压缩质量比结果是文件变大。事实上，当我采用75%以上的压缩质量百分比时，图象都保持很好的效果。
  
  Compression quality percentage
  Resulting JPEG file size
  
  100%
  57,477
  
  95%
  32,247
  
  90%
  23,037
  
  85%
  18,325
  
  80%
  15,489
  
  75%
  13,551
  
  70%
  12,190
  
  65%
  11,129
  
  60%
  10,257
  
  55%
  9,562
  
  50%
  8,960
  
  0%
  1,813
  
  
  从JPEG转化为BMP
  把JPEG图象转化为BMP图象能够节省很大的存储空间，但是这一过程要丢失一些图象性质。在很多情况下人们都是存储BMP文件而不是JPEG文件。
  
  幸运的是，从JPEG转化到BMP是非常的容易，你无需使用压缩质量的方式。但是你应该记住，BMP文件是不能压缩的，所认BMP的压缩设置对最后的文件大小没有任何的影响。
  
  Delphi JPG2BMP工程的源代码位于Listing B。这一程序演示了以上所说的内容。
  
  非常容易地转化
  这里的代码片段演示了如何转化BMP到JPEG及如何返之转化。即使你还关注转化的质量和文件大小，Delphi的TJPEGImage控件也能让你很容易地完成这一操作。

• [1] [2] 下一页 
• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• 利用Delphi的TJPEGImage控件把BMP转化成JPEG 相关文章：
• ·利用Delphi的TJPEGImage控件把BMP转化成JPEG
• 利用Delphi的TJPEGImage控件把BMP转化成JPEG 相关软件

上一篇:利用Delphi轻松编制压缩助理程序

下一篇:利用Delphi 5.0开发OLE自动化控制器操纵Excel

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐