anchor.diff:    BitmapArrayHeader: INFBITMAPARRAYHEADER;
     bytes: integer;
   begin
  +  inherited Create;
     FileHandle := AFileHandle;
   
     FileHandle.Seek(Offset, soBeginning);
  
positive.code:   end;
  
    TBitmapBlock = class(TObject)
      _Data: PBYTE;
      _Size: uint16;
      _CompressionType: uint8;
      destructor Destroy; override;
    end;
  
  
negative.code:         if not Assigned( LZWDecompressBlock )then
            raise EHelpBitmapException.Create( 'Cannot decode bitmap - DLL not found' );
  
  //        DecompressLZW(Block._Data, Block._Size);
          //LZWDecompressBlock( Block._Data,
          //                    BitmapOutputPointer,
          //                    Block._Size,
          //                    BytesWrittenFromBlock,
          //                    lastOutByte );
  
          inc( BytesWritten, BytesWrittenFromBlock );
  
  