Jpeg 格式的帕斯卡

代码说明：

PASJPEG 是一个端口 IJG C 源 （发布第六次公开发布6a 的 96 年 2 月 7 日) [3]，实现 JPEG 基线，扩展顺序，和到 Turbo Pascal 7.0 为 DOS (TP) 的渐进压缩过程。代码已经过测试下 Delphi 2.0 [6]，它可以移植到其他帕斯卡环境中，由于许多编译器尝试来兼容磷