anchor.diff:  
       property DataState: TResourceLoadState read fDataState;
       property Cursors: TKMResCursors read fCursors;
  -    property Houses: TKMResHouses read fHouses;
  +    property Houses: TKMResHouses read GetHouses;
       property MapElements: TKMResMapElements read fMapElements;
       property Palettes: TKMResPalettes read fPalettes;
       property Fonts: TKMResFonts read fFonts;
  
positive.code:             fUnits.CRC xor
              fMapElements.CRC xor
              fTileset.CRC;
  end;
  
  
  
negative.code: 
      procedure StepRefresh;
      procedure StepCaption(const aCaption: UnicodeString);
      function GetHouses: TKMResHouses;
    public
      OnLoadingStep: TEvent;
      OnLoadingText: TUnicodeStringEvent;
  