I have just hunted down and reported (to Borland via their web pages) a
bug with Delphi 5 where it cannot load RLE encoded bitmaps. The offending
code is on line 5724 of Graphics.pas where it reads:

  RLEStream.Seek(ImageSize, soFromEnd);

Unfortunately ImageSize is a positive value and this has the effect of
moving the stream position way past the end of the file, which was not the
intended result of this repositioning. I have made a temporary patch as
follows:

  RLEStream.Seek(-LongInt(ImageSize), soFromEnd);

and this corrects the problem.

Hopefully this will make it into a patch for D5 in the future, but perhaps
a little more cleanly than my small but ugly fix.

Cheers, Max.


---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to