From b866e7363ad46bc06b6e490fa50af138767bd650 Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Wed, 10 Apr 2013 00:20:43 +0100 Subject: docview: To make sure TotalSize is > 0 --- docview/src/HelpBitmap.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'docview') diff --git a/docview/src/HelpBitmap.pas b/docview/src/HelpBitmap.pas index 692bf64d..45855a1f 100644 --- a/docview/src/HelpBitmap.pas +++ b/docview/src/HelpBitmap.pas @@ -83,7 +83,7 @@ type _UncompressedBlockSize: longint; function GetPaletteSize: longint; procedure BitmapError(Msg: string); - procedure ReadBitmapData( Blocks: TList; TotalSize: longint ); + procedure ReadBitmapData( Blocks: TList; TotalSize: longword); public constructor CreateFromHelpFile(var AFileHandle: TFileStream; Offset: longint); destructor Destroy; override; @@ -267,7 +267,7 @@ begin inherited Destroy; end; -procedure THelpBitmap.ReadBitmapData( Blocks: TList; TotalSize: longint ); +procedure THelpBitmap.ReadBitmapData( Blocks: TList; TotalSize: longword ); var BytesWritten: longint; BytesWrittenFromBlock: longword; -- cgit v1.2.3-70-g09d2