如何在Delphi中生成图片缩略图的.rar

Delphi生成图片缩略图的例子，附上完整的源代码，本程序可生成两种图片大小的缩略图，使用方法很简单，只需点击一下操作按钮即可，感觉在平时需要自动生成缩略图的时候比较多，所以这个小程序还是挺实用的吧。

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2462  2015-07-25 14:40  codesc.net\Delphi创建Jpeg图像的缩略图\JpegConv.pas

     文件        219  2002-07-01 18:47  codesc.net\Delphi创建Jpeg图像的缩略图\Project1.dpr

     文件        876  2002-12-06 09:14  codesc.net\Delphi创建Jpeg图像的缩略图\Project1.res

     文件      40294  2002-07-01 18:47  codesc.net\Delphi创建Jpeg图像的缩略图\tmp.jpg

     文件      95274  2002-07-01 18:47  codesc.net\Delphi创建Jpeg图像的缩略图\Unit1.dfm

     文件       1555  2002-07-01 18:47  codesc.net\Delphi创建Jpeg图像的缩略图\Unit1.pas

    ..AD...         0  2015-07-25 14:39  codesc.net\Delphi创建Jpeg图像的缩略图

     目录          0  2015-07-25 14:39  codesc.net

----------- ---------  ---------- -----  ----

               140680                    8