首页 相关文章 将image的图片保存为JPG格式图片方法

将image的图片保存为JPG格式图片方法

将image组件的图片保存为JPG格式图片方法procedure SaveAsJPG ;var jp: TJPEGImage; //Requires the "jpeg" unit added to "uses" clause.begin jp := TJPEGImage.Create; try with jp do begin jp.CompressionQuality := 2; jp.Compress ; Assign(Image1.Picture.Bitmap); SaveToFile('D:zhy.jpg'); end; finally jp.Free; end; ////---读入方法如下:procedure OpenJPGInImagevar jp: TJPEGImage; //Requires the "jpeg" unit added to "uses" clause.begin jp := TJPEGImage.Create; jp.LoadFromFile('D:zhy.jpg'); try with jp do begin ...[ 查看全文 ]

2016-02-19 标签:

将image的图片保存为JPG格式图片方法的相关文章

手机页面
收藏网站 回到头部