Delphi用于图象压缩(100分)

  • 主题发起人 主题发起人 zcq18
  • 开始时间 开始时间
Z

zcq18

Unregistered / Unconfirmed
GUEST, unregistred user!
那位老兄知道如何对一副图片(假设是位图吧)实现小波压缩。(压缩为小波Wav格式)
 
看JEPG2000标准:
http://www.pconline.com.cn/pcedu/sj/pm/other/10111/14219.html

http://cn.geocities.com/li_yu_cheng/school/mutimedia/report/experience.htm
 
我有一个小波压缩图象的Demo(可执行文件),
Delphi编的,但作者不免费提供源码。
可以和作者联系: zf@51.com
想要Demo的话留下你的E-mail
 
我的Email是azcq@netease.com
 
var jpg:TJpg//呵,我忘了
btp:tbitmap;
begin
jpg:=tjpg.create;
btp:=tbitmap.create;
btp.loadfromfile('d:/1.bmp');
btp.assign(jpg);
jpg.savetofile('d:/q.jpg');
jpg.free;
btp.free;
end;
 
这样图象被压缩为Jpg格式,但是我想把它压缩为小波格式。Jpg格式用的是
离散余弦变换(DCT),我想用的处理工具是离散小波变换(DWT)。Jpeg2000用的是
小波变换,但具体的技术细节我不清楚
 
对 用小波压缩的比例和质量比较好,特别适合动态图像, 但一般动态图像我用h.263
算法,如果 你需要这个算法 我可以给你。我也在找具体小波算法的标准(嘿嘿嘿,最好是控件,
免得自己麻烦)
 
后退
顶部