diff options
| author | Graeme Geldenhuys <graemeg@gmail.com> | 2013-04-04 23:44:37 +0100 |
|---|---|---|
| committer | David Laurence Emerson <dle3ab@angelbase.com> | 2013-05-28 00:42:51 -0700 |
| commit | c1b355588ffdd76402e380e6006756fb585aca3f (patch) | |
| tree | d82675c5b561df320d191870f240b64bf716d986 /src/corelib/fpg_imgfmt_bmp.pas | |
| parent | e770e7bc9bbf6f52037c063fee82aa7e3aaee49a (diff) | |
| download | fpGUI-c1b355588ffdd76402e380e6006756fb585aca3f.tar.xz | |
bmp code now raises an exception for a unknown BMP format.
Before it would have done a writeln() which would go unnoticed under
Linux, and cause an AV under Windows GUI apps.
Diffstat (limited to 'src/corelib/fpg_imgfmt_bmp.pas')
| -rw-r--r-- | src/corelib/fpg_imgfmt_bmp.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/corelib/fpg_imgfmt_bmp.pas b/src/corelib/fpg_imgfmt_bmp.pas index 353b3216..5add70ba 100644 --- a/src/corelib/fpg_imgfmt_bmp.pas +++ b/src/corelib/fpg_imgfmt_bmp.pas @@ -314,7 +314,7 @@ begin until linecnt >= img.Height; end; else - writeln('Unsupported BMP format!'); + raise Exception.Create('Unsupported BMP format!'); end; if ppal <> nil then |