anchor.diff:      _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;
   
   
  
positive.code: {
    fpGUI  -  Free Pascal GUI Toolkit
  
    Copyright (C) 2006 - 2013 See the file AUTHORS.txt, included in this
    distribution, for details of the copyright.
  
    See the file COPYING.modifiedLGPL, included in this distribution,
  
negative.code:   inherited Destroy;
  end;
  
  constructor THelpBitmap.CreateFromHelpFile(var AFileHandle: TFileStream; Offset: longword);
  var
    WordsPerLine: longint;
    LineSize: longint;
  