anchor.diff:  type
     TKMGUIGameHouse = class
     private
  +    fAnimStep: Cardinal;
       fLastSchoolUnit: Byte;  //Last unit that was selected in School, global for all schools player owns
       fLastBarracksUnit: Byte; //Last unit that was selected in Barracks, global for all barracks player owns
       fLastTHUnit: Byte; //Last unit that was selected in Townhall, global for all townhalls player owns
  
positive.code: begin
    AskDemolish := aAskDemolish;
  
    //Hide all House sub-pages
    for I := 0 to Panel_House.ChildCount - 1 do
      if Panel_House.Childs[I] is TKMPanel then
        Panel_House.Childs[I].Hide;
  
  
  
    Panel_House.SetCanChangeEnable(gMySpectator.IsSelectedMyObj, DoNotDisableControls);
  
  
negative.code:   inherited Create;
  
    fSetViewportEvent := aSetViewportEvent;
    fAnimStep := 0;
  
    Panel_House := TKMPanel.Create(aParent, TB_PAD, 44, TB_WIDTH, 332);
      //Thats common things
  