diff options
Diffstat (limited to '')
-rw-r--r-- | Game/Code/MacOSX/Wrapper/JPEG.pas | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/Game/Code/MacOSX/Wrapper/JPEG.pas b/Game/Code/MacOSX/Wrapper/JPEG.pas deleted file mode 100644 index e25c193e..00000000 --- a/Game/Code/MacOSX/Wrapper/JPEG.pas +++ /dev/null @@ -1,34 +0,0 @@ -unit JPEG; - -{$I switches.inc} - -interface - -uses Graphics; - -type - TJPEGImage = class(TBitmap) - private - FCompressionQuality : Integer; - public - Procedure SaveToFile(const f : String); override; - property CompressionQuality : Integer read FCompressionQuality write FCompressionQuality; - end; - -implementation - -uses FreeImage; - -{ TJPEGImage } - -procedure TJPEGImage.SaveToFile(const f: String); -begin - if CompressionQuality = 0 then begin - CompressionQuality := 95; - end; - - FImage.Save( f, CompressionQuality); -end; - -end. - |