summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2015-09-02 10:05:39 +0100
committerGraeme Geldenhuys <graemeg@gmail.com>2015-09-02 10:05:39 +0100
commit0bcbc15b3017f047bd7642aa21a60cac5fc508f4 (patch)
treef5ebad6dbca13f08fdae66ac64601a18d78eb521
parent25ece4a865b286fae12eb27fb8dc4864ff17b422 (diff)
downloadfpGUI-0bcbc15b3017f047bd7642aa21a60cac5fc508f4.tar.xz
docview: file offset will always be a positive value.
-rw-r--r--docview/src/HelpBitmap.pas16
1 files changed, 8 insertions, 8 deletions
diff --git a/docview/src/HelpBitmap.pas b/docview/src/HelpBitmap.pas
index 45855a1f..28b04d68 100644
--- a/docview/src/HelpBitmap.pas
+++ b/docview/src/HelpBitmap.pas
@@ -1,7 +1,7 @@
{
fpGUI - Free Pascal GUI Toolkit
- Copyright (C) 2006 - 2013 See the file AUTHORS.txt, included in this
+ Copyright (C) 2006 - 2015 See the file AUTHORS.txt, included in this
distribution, for details of the copyright.
See the file COPYING.modifiedLGPL, included in this distribution,
@@ -73,7 +73,7 @@ type
end;
- THelpBitmap = class( TfpgImage )
+ THelpBitmap = class(TfpgImage)
protected
_Header: INFBITMAPHEADER;
_PaletteColorCount: longint;
@@ -81,12 +81,12 @@ type
_BitsSize: longint;
FileHandle: TFileStream;
_UncompressedBlockSize: longint;
- function GetPaletteSize: longint;
- procedure BitmapError(Msg: string);
- procedure ReadBitmapData( Blocks: TList; TotalSize: longword);
+ function GetPaletteSize: longint;
+ procedure BitmapError(Msg: string);
+ procedure ReadBitmapData( Blocks: TList; TotalSize: longword);
public
- constructor CreateFromHelpFile(var AFileHandle: TFileStream; Offset: longint);
- destructor Destroy; override;
+ constructor CreateFromHelpFile(var AFileHandle: TFileStream; Offset: longword);
+ destructor Destroy; override;
end;
@@ -128,7 +128,7 @@ begin
inherited Destroy;
end;
-constructor THelpBitmap.CreateFromHelpFile(var AFileHandle: TFileStream; Offset: longint);
+constructor THelpBitmap.CreateFromHelpFile(var AFileHandle: TFileStream; Offset: longword);
var
WordsPerLine: longint;
LineSize: longint;