mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-30 20:30:41 +02:00
* Don't set the bfOffBits member of the dummy fileheader, when set pixeldata is expected there. Fixes issue #13906
git-svn-id: trunk@20412 -
This commit is contained in:
parent
98e4b39c28
commit
cf12e50a5a
@ -50,7 +50,7 @@ begin
|
||||
|
||||
Header.bfType := $4d42;
|
||||
Header.bfSize := SizeOf(Header) + ASize;
|
||||
Header.bfOffBits := SizeOf(Header);
|
||||
Header.bfOffBits := 0; //data imediately follows
|
||||
{$IFDEF ENDIAN_BIG}
|
||||
swap(Header.bfType);
|
||||
swap(Header.bfSize);
|
||||
@ -63,7 +63,7 @@ begin
|
||||
TempStream.Write(Header, SizeOf(Header));
|
||||
TempStream.CopyFrom(AStream, ASize);
|
||||
TempStream.Position := 0;
|
||||
inherited LoadFromStream(TempStream, ASize);
|
||||
inherited LoadFromStream(TempStream, Header.bfSize);
|
||||
finally
|
||||
TempStream.Free;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user