云联惠现在怎么样了:怎么用C++编写一个压缩程序?

来源:百度文库 编辑:神马品牌网 时间:2024/05/04 17:05:43
也可以用其他编写软件

delphi的!!!压缩程序啊,图片压缩算不算?
bmp转成jpg也是压缩哦!
/**********************bmp位图转jpeg begin*************************

begin
abitmap := tbitmap.Create;
od1.Filter := '位图文件|*.bmp';
if od1.Execute then
filename := od1.filename
else
Exit;
bsSkinGroupBox1.Caption := filename;
abitmap.LoadFromFile(filename);
Image1.Picture.Assign(abitmap);
ajpg := tjpegimage.Create;
ajpg.Assign(abitmap);
ajpg.CompressionQuality := 75;
ajpg.Compress;
Sd1.Filter := 'jpg文件|*.jpg';
if Sd1.Execute then
ajpg.SaveToFile(Sd1.filename + '.jpg');
ajpg.Free;
abitmap.Free;
end;
//**********************bmp位图转jpeg end*************************

随便找个系统的源代码,用c或是c++写的。 一边里面都有压缩的模块,拿来用好了!

http://sourceforge.net