anchor.diff:  
   function TKMGUIGameSpectatorItemLineCustomBuildings.GetTagCount: Integer;
   begin
  -  Result := Integer(HOUSE_MAX) - Integer(HOUSE_MIN);
  +  Result := Integer(HOUSE_MAX) - Integer(HOUSE_MIN) + 1;
   end;
   
   function TKMGUIGameSpectatorItemLineCustomBuildings.GetTag(AIndex: Integer): Integer;
  
positive.code:   Result := Integer(HOUSE_MIN) + AIndex;
  end;
  
  { TKMGUIGameSpectatorItemLineBuildings }
  
  function TKMGUIGameSpectatorItemLineBuild.GetValue(AHandIndex: Integer; ATag: Integer): String;
  var
  
negative.code: 
  function TKMGUIGameSpectatorItemLineResources.GetTagCount: Integer;
  begin
    Result := Integer(WARE_MAX) - Integer(WARE_MIN) + 1;
  end;
  
  function TKMGUIGameSpectatorItemLineResources.GetTag(AIndex: Integer): Integer;
  