1,问题的提出 公司开发了一个图像压缩上传程序.采用Delphi语言实现.大致步骤如下: 1,上传前将文件打开装载到TJpegImage, 2,创建一个TBitmap组件,设置其大小,采用StretchDraw方法将TJpegImage的图像绘制到TBitmap组件, 3,将TBitmap组件的图像赋值给TJpegImage, 4,设定TJpegImage的压缩率,调用压缩方法执行压缩, 5,最后保存新的图像到文件中 代码如下: //输入:要转换大小的图片文件路径 //输出:转换后文件的路径 f…