有没有快速的从BMP生成JPEG文件的函数

euler_16 2007-04-02 02:55:01
有没有快速的从BMP生成JPEG文件的函数,用TJPEGIMAGE里面的COMPRESS太慢了,有没有快速的算法或函数?
...全文
389 10 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
UltraBejing 2008-05-01
  • 打赏
  • 举报
回复
不知,帮顶
miky 2007-04-06
  • 打赏
  • 举报
回复
intel 提供了个Dll, 叫 ijl20.dll, 应该很快, 试试看吧
euler_16 2007-04-06
  • 打赏
  • 举报
回复
我在Google Earth 里面找到这个文件了,该如何使用?
有例子吗?
euler_16 2007-04-06
  • 打赏
  • 举报
回复
to milky: 你有ijl20.dll这个文件吗?从哪里可以找到
有没有相关的DELPHI的例子?
xiaocai800322 2007-04-03
  • 打赏
  • 举报
回复
关注
xiaocai800322 2007-04-03
  • 打赏
  • 举报
回复
//bmp转化为JPG
BMPToJPG(BmpFilepath,BmpFileName,SizeNameJpgFilepath,SizeCodejpgFileName,jpgFileName:string;Flag:boolean=false);
var
Jpeg : TJPEGImage;
Bmp : TBitmap;
var
Create:boolean;
begin
try
if DirectoryExists(SizeNameJpgFilepath)=false then
begin
if ForceDirectories(SizeNameJpgFilepath)=false then
begin
SizeNameJpgFilepath:=SizeCodejpgFileName;
ForceDirectories(SizeNameJpgFilepath);
end;
end;
Bmp := TBitmap.Create;
try
Bmp.LoadFromFile(BmpFilepath+BmpFileName);
Jpeg := TJPEGImage.Create;
try
Jpeg.Assign(Bmp);
Jpeg.Compress;
//保存图片
Jpeg.SaveToFile(SizeNameJpgFilepath+jpgFileName);
finally
Jpeg.Free;
end;
finally
Bmp.Free;
end;
except
end;
if Flag=true then
DeleteFile(BmpFilepath+BmpFileName);
end;

//JPG文件转换为BMP文件,其中省略的部分只要将bmp文件创建与操作同JPG换过来,同上面的函数
//差不多,只是写出来的那部分不一样
JPGToBMP(BmpFilepath,BmpFileName,SizeNameJpgFilepath,SizeCodejpgFileName,jpgFileName:string;Flag:boolean=false);
var
Jpeg : TJPEGImage;
Bmp : TBitmap;
var
Create:boolean;
begin
try
...
try
...
try
....
Bmp.Assign(Jpeg);
Bmp.Dormant;
Bmp.FreeImage;
//保存图片或者绘制图片
....
finally

end;
finally
......
end;
except
end;
.......
end;
hongqi162 2007-04-03
  • 打赏
  • 举报
回复
可以使用opencv

cvLoadImage........

cvSaveImage........

这个转换速度应该很理想


  • 打赏
  • 举报
回复
TImageen 速度还可以
天涯倦客 2007-04-02
  • 打赏
  • 举报
回复
gdi+函数 看看
蒋晟 2007-04-02
  • 打赏
  • 举报
回复
找个C++的库吧

1,185

社区成员

发帖
与我相关
我的任务
社区描述
Delphi GAME,图形处理/多媒体
社区管理员
  • GAME,图形处理/多媒体社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧