anchor.diff:    Build_Fill(nil);
     KMPanel_Build.Visible:=true;
     Hide4MainButtons;
  +  KMLabel_MenuTitle.Caption:=fTextLibrary.GetTextString(166);
     SelectRoad;
   end else
   if Sender=KMButtonMain[2] then begin
     KMPanel_Ratios.Visible:=true;
     Hide4MainButtons;
  +  KMLabel_MenuTitle.Caption:=fTextLibrary.GetTextString(167);
   end else
   if Sender=KMButtonMain[3] then begin
     Stats_Fill(nil);
     KMPanel_Stats.Visible:=true;
     Hide4MainButtons;
  +  KMLabel_MenuTitle.Caption:=fTextLibrary.GetTextString(168);
   end else
  -if Sender=KMButtonMain[4] then begin
  +if ((Sender=KMButtonMain[4]) or (Sender=KMButton_Quit_No)) then begin
     KMPanel_Menu.Visible:=true;
     Hide4MainButtons;
  +  KMLabel_MenuTitle.Caption:=fTextLibrary.GetTextString(170);
   end else
   if Sender=KMButton_Menu_Settings then begin
     KMPanel_Settings.Visible:=true;
     Hide4MainButtons;
  -end else
  +  KMLabel_MenuTitle.Caption:=fTextLibrary.GetTextString(179);
  +end else  
   if Sender=KMButton_Menu_Quit then begin
     KMPanel_Quit.Visible:=true;
  -  Hide4MainButtons;
  -end else
  -if Sender=KMButton_Quit_No then begin
  -  KMPanel_Menu.Visible:=true;
     Hide4MainButtons;
   end else //If Sender is anything else - then show all 4 buttons and hide Return button
     Show4MainButtons;
  
positive.code:      KMImage_Build_Selected.TexID := GUIBuildIcons[i]; //Now update the selected icon
       KMLabel_BuildCost_Wood.Caption:=inttostr(HouseDAT[GUIBuildIcons[i]-300].WoodCost);
       KMLabel_BuildCost_Stone.Caption:=inttostr(HouseDAT[GUIBuildIcons[i]-300].StoneCost);
    end;
  end;
  
  
negative.code:           inc(Line);
            for i:=1 to 4 do if HouseInput[byte(Sender.GetHouseType),i] in [rt_Trunk..rt_Fish] then begin
              KMRow_Common_Resource[RowRes].Resource:=HouseInput[byte(Sender.GetHouseType),i];
              KMRow_Common_Resource[RowRes].Hint:=TypeToString(HouseInput[byte(Sender.GetHouseType),i]);
              KMRow_Common_Resource[RowRes].ResourceCount:=Sender.CheckResIn(HouseInput[byte(Sender.GetHouseType),i]);
              KMRow_Common_Resource[RowRes].Visible:=true;
              KMRow_Common_Resource[RowRes].Top:=Base+Line*LineAdv;
  